home *** CD-ROM | disk | FTP | other *** search
Unknown | 1998-12-14 | 13.5 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
1%
| dexvert
| Windows Terminal Configuration (other/windowsTerminalConfiguration)
| ext
| Unsupported |
100%
| file
| data
| default
| |
100%
| gt2
| C/C++ Source Code
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 2f 2a 0a 20 2a 20 24 49 | 64 3a 20 70 74 64 6c 69 |/*. * $I|d: ptdli|
|00000010| 62 2e 68 3e 08 2c 16 84 | 00 00 36 2c 38 2f 31 32 |b.h>.,..|..6,8/12|
|00000020| 2f 31 34 20 31 38 3a 34 | 30 3a 35 31 20 6c 68 65 |/14 18:4|0:51 lhe|
|00000030| 63 6b 69 6e 67 20 45 78 | 70 20 24 0a 20 2a 0a 20 |cking Ex|p $. *. |
|00000040| 2a 2f 0a 0a 2f 2a 20 47 | 4e 55 50 4c 4f 54 20 2d |*/../* G|NUPLOT -|
|00000050| 20 70 63 2e 74 72 6d 20 | 2a 2f 0a 0a 2f 2a 5b 0a | pc.trm |*/../*[.|
|00000060| 20 2a 20 43 6f 70 79 72 | 69 67 68 74 20 31 39 39 | * Copyr|ight 199|
|00000070| 30 20 2d 20 31 39 39 33 | 2c 20 31 39 39 38 0a 20 |0 - 1993|, 1998. |
|00000080| 2a 0a 20 2a 20 50 65 72 | 6d 69 73 73 69 6f 6e 20 |*. * Per|mission |
|00000090| 74 6f 20 75 73 65 2c 20 | 63 6f 70 79 2c 20 61 6e |to use, |copy, an|
|000000a0| 64 20 64 69 73 74 72 69 | 62 75 74 65 20 74 68 69 |d distri|bute thi|
|000000b0| 73 20 73 6f 66 74 77 61 | 72 65 20 61 6e 64 20 69 |s softwa|re and i|
|000000c0| 74 73 0a 20 2a 20 64 6f | 63 75 6d 65 6e 74 61 74 |ts. * do|cumentat|
|000000d0| 69 6f 6e 20 66 6f 72 20 | 61 6e 79 20 70 75 72 70 |ion for |any purp|
|000000e0| 6f 73 65 20 77 69 74 68 | 20 6f 72 20 77 69 74 68 |ose with| or with|
|000000f0| 6f 75 74 20 66 65 65 20 | 69 73 20 68 65 72 65 62 |out fee |is hereb|
|00000100| 79 20 67 72 61 6e 74 65 | 64 2c 0a 20 2a 20 70 72 |y grante|d,. * pr|
|00000110| 6f 76 69 64 65 64 20 74 | 68 61 74 20 74 68 65 20 |ovided t|hat the |
|00000120| 61 62 6f 76 65 20 63 6f | 70 79 72 69 67 68 74 20 |above co|pyright |
|00000130| 6e 6f 74 69 63 65 20 61 | 70 70 65 61 72 20 69 6e |notice a|ppear in|
|00000140| 20 61 6c 6c 20 63 6f 70 | 69 65 73 20 61 6e 64 0a | all cop|ies and.|
|00000150| 20 2a 20 74 68 61 74 20 | 62 6f 74 68 20 74 68 61 | * that |both tha|
|00000160| 74 20 63 6f 70 79 72 69 | 67 68 74 20 6e 6f 74 69 |t copyri|ght noti|
|00000170| 63 65 20 61 6e 64 20 74 | 68 69 73 20 70 65 72 6d |ce and t|his perm|
|00000180| 69 73 73 69 6f 6e 20 6e | 6f 74 69 63 65 20 61 70 |ission n|otice ap|
|00000190| 70 65 61 72 0a 20 2a 20 | 69 6e 20 73 75 70 70 6f |pear. * |in suppo|
|000001a0| 72 74 69 6e 67 20 64 6f | 63 75 6d 65 6e 74 61 74 |rting do|cumentat|
|000001b0| 69 6f 6e 2e 0a 20 2a 0a | 20 2a 20 50 65 72 6d 69 |ion.. *.| * Permi|
|000001c0| 73 73 69 6f 6e 20 74 6f | 20 6d 6f 64 69 66 79 20 |ssion to| modify |
|000001d0| 74 68 65 20 73 6f 66 74 | 77 61 72 65 20 69 73 20 |the soft|ware is |
|000001e0| 67 72 61 6e 74 65 64 2c | 20 62 75 74 20 6e 6f 74 |granted,| but not|
|000001f0| 20 74 68 65 20 72 69 67 | 68 74 20 74 6f 0a 20 2a | the rig|ht to. *|
|00000200| 20 64 69 73 74 72 69 62 | 75 74 65 20 74 68 65 20 | distrib|ute the |
|00000210| 63 6f 6d 70 6c 65 74 65 | 20 6d 6f 64 69 66 69 65 |complete| modifie|
|00000220| 64 20 73 6f 75 72 63 65 | 20 63 6f 64 65 2e 20 20 |d source| code. |
|00000230| 4d 6f 64 69 66 69 63 61 | 74 69 6f 6e 73 20 61 72 |Modifica|tions ar|
|00000240| 65 20 74 6f 0a 20 2a 20 | 62 65 20 64 69 73 74 72 |e to. * |be distr|
|00000250| 69 62 75 74 65 64 20 61 | 73 20 70 61 74 63 68 65 |ibuted a|s patche|
|00000260| 73 20 74 6f 20 74 68 65 | 20 72 65 6c 65 61 73 65 |s to the| release|
|00000270| 64 20 76 65 72 73 69 6f | 6e 2e 20 20 50 65 72 6d |d versio|n. Perm|
|00000280| 69 73 73 69 6f 6e 20 74 | 6f 0a 20 2a 20 64 69 73 |ission t|o. * dis|
|00000290| 74 72 69 62 75 74 65 20 | 62 69 6e 61 72 69 65 73 |tribute |binaries|
|000002a0| 20 70 72 6f 64 75 63 65 | 64 20 62 79 20 63 6f 6d | produce|d by com|
|000002b0| 70 69 6c 69 6e 67 20 6d | 6f 64 69 66 69 65 64 20 |piling m|odified |
|000002c0| 73 6f 75 72 63 65 73 20 | 69 73 20 67 72 61 6e 74 |sources |is grant|
|000002d0| 65 64 2c 0a 20 2a 20 70 | 72 6f 76 69 64 65 64 20 |ed,. * p|rovided |
|000002e0| 79 6f 75 0a 20 2a 20 20 | 20 31 2e 20 64 69 73 74 |you. * | 1. dist|
|000002f0| 72 69 62 75 74 65 20 74 | 68 65 20 63 6f 72 72 65 |ribute t|he corre|
|00000300| 73 70 6f 6e 64 69 6e 67 | 20 73 6f 75 72 63 65 20 |sponding| source |
|00000310| 6d 6f 64 69 66 69 63 61 | 74 69 6f 6e 73 20 66 72 |modifica|tions fr|
|00000320| 6f 6d 20 74 68 65 0a 20 | 2a 20 20 20 20 72 65 6c |om the. |* rel|
|00000330| 65 61 73 65 64 20 76 65 | 72 73 69 6f 6e 20 69 6e |eased ve|rsion in|
|00000340| 20 74 68 65 20 66 6f 72 | 6d 20 6f 66 20 61 20 70 | the for|m of a p|
|00000350| 61 74 63 68 20 66 69 6c | 65 20 61 6c 6f 6e 67 20 |atch fil|e along |
|00000360| 77 69 74 68 20 74 68 65 | 20 62 69 6e 61 72 69 65 |with the| binarie|
|00000370| 73 2c 0a 20 2a 20 20 20 | 32 2e 20 61 64 64 20 73 |s,. * |2. add s|
|00000380| 70 65 63 69 61 6c 20 76 | 65 72 73 69 6f 6e 20 69 |pecial v|ersion i|
|00000390| 64 65 6e 74 69 66 69 63 | 61 74 69 6f 6e 20 74 6f |dentific|ation to|
|000003a0| 20 64 69 73 74 69 6e 67 | 75 69 73 68 20 79 6f 75 | disting|uish you|
|000003b0| 72 20 76 65 72 73 69 6f | 6e 0a 20 2a 20 20 20 20 |r versio|n. * |
|000003c0| 69 6e 20 61 64 64 69 74 | 69 6f 6e 20 74 6f 20 74 |in addit|ion to t|
|000003d0| 68 65 20 62 61 73 65 20 | 72 65 6c 65 61 73 65 20 |he base |release |
|000003e0| 76 65 72 73 69 6f 6e 20 | 6e 75 6d 62 65 72 2c 0a |version |number,.|
|000003f0| 20 2a 20 20 20 33 2e 20 | 70 72 6f 76 69 64 65 20 | * 3. |provide |
|00000400| 79 6f 75 72 20 6e 61 6d | 65 20 61 6e 64 20 61 64 |your nam|e and ad|
|00000410| 64 72 65 73 73 20 61 73 | 20 74 68 65 20 70 72 69 |dress as| the pri|
|00000420| 6d 61 72 79 20 63 6f 6e | 74 61 63 74 20 66 6f 72 |mary con|tact for|
|00000430| 20 74 68 65 0a 20 2a 20 | 20 20 20 73 75 70 70 6f | the. * | suppo|
|00000440| 72 74 20 6f 66 20 79 6f | 75 72 20 6d 6f 64 69 66 |rt of yo|ur modif|
|00000450| 69 65 64 20 76 65 72 73 | 69 6f 6e 2c 20 61 6e 64 |ied vers|ion, and|
|00000460| 0a 20 2a 20 20 20 34 2e | 20 72 65 74 61 69 6e 20 |. * 4.| retain |
|00000470| 6f 75 72 20 63 6f 6e 74 | 61 63 74 20 69 6e 66 6f |our cont|act info|
|00000480| 72 6d 61 74 69 6f 6e 20 | 69 6e 20 72 65 67 61 72 |rmation |in regar|
|00000490| 64 20 74 6f 20 75 73 65 | 20 6f 66 20 74 68 65 20 |d to use| of the |
|000004a0| 62 61 73 65 0a 20 2a 20 | 20 20 20 73 6f 66 74 77 |base. * | softw|
|000004b0| 61 72 65 2e 0a 20 2a 20 | 50 65 72 6d 69 73 73 69 |are.. * |Permissi|
|000004c0| 6f 6e 20 74 6f 20 64 69 | 73 74 72 69 62 75 74 65 |on to di|stribute|
|000004d0| 20 74 68 65 20 72 65 6c | 65 61 73 65 64 20 76 65 | the rel|eased ve|
|000004e0| 72 73 69 6f 6e 20 6f 66 | 20 74 68 65 20 73 6f 75 |rsion of| the sou|
|000004f0| 72 63 65 20 63 6f 64 65 | 20 61 6c 6f 6e 67 0a 20 |rce code| along. |
|00000500| 2a 20 77 69 74 68 20 63 | 6f 72 72 65 73 70 6f 6e |* with c|orrespon|
|00000510| 64 69 6e 67 20 73 6f 75 | 72 63 65 20 6d 6f 64 69 |ding sou|rce modi|
|00000520| 66 69 63 61 74 69 6f 6e | 73 20 69 6e 20 74 68 65 |fication|s in the|
|00000530| 20 66 6f 72 6d 20 6f 66 | 20 61 20 70 61 74 63 68 | form of| a patch|
|00000540| 20 66 69 6c 65 20 69 73 | 0a 20 2a 20 67 72 61 6e | file is|. * gran|
|00000550| 74 65 64 20 77 69 74 68 | 20 73 61 6d 65 20 70 72 |ted with| same pr|
|00000560| 6f 76 69 73 69 6f 6e 73 | 20 32 20 74 68 72 6f 75 |ovisions| 2 throu|
|00000570| 67 68 20 34 20 66 6f 72 | 20 62 69 6e 61 72 79 20 |gh 4 for| binary |
|00000580| 64 69 73 74 72 69 62 75 | 74 69 6f 6e 73 2e 0a 20 |distribu|tions.. |
|00000590| 2a 0a 20 2a 20 54 68 69 | 73 20 73 6f 66 74 77 61 |*. * Thi|s softwa|
|000005a0| 72 65 20 69 73 20 70 72 | 6f 76 69 64 65 64 20 22 |re is pr|ovided "|
|000005b0| 61 73 20 69 73 22 20 77 | 69 74 68 6f 75 74 20 65 |as is" w|ithout e|
|000005c0| 78 70 72 65 73 73 20 6f | 72 20 69 6d 70 6c 69 65 |xpress o|r implie|
|000005d0| 64 20 77 61 72 72 61 6e | 74 79 0a 20 2a 20 74 6f |d warran|ty. * to|
|000005e0| 20 74 68 65 20 65 78 74 | 65 6e 74 20 70 65 72 6d | the ext|ent perm|
|000005f0| 69 74 74 65 64 20 62 79 | 20 61 70 70 6c 69 63 61 |itted by| applica|
|00000600| 62 6c 65 20 6c 61 77 2e | 0a 5d 2a 2f 0a 0a 2f 2a |ble law.|.]*/../*|
|00000610| 0a 20 2a 20 54 68 69 73 | 20 66 69 6c 65 20 69 73 |. * This| file is|
|00000620| 20 69 6e 63 6c 75 64 65 | 64 20 62 79 20 2e 2e 2f | include|d by ../|
|00000630| 74 65 72 6d 2e 63 2e 0a | 20 2a 0a 20 2a 20 54 68 |term.c..| *. * Th|
|00000640| 69 73 20 74 65 72 6d 69 | 6e 61 6c 20 64 72 69 76 |is termi|nal driv|
|00000650| 65 72 20 73 75 70 70 6f | 72 74 73 3a 0a 20 2a 20 |er suppo|rts:. * |
|00000660| 20 55 6e 64 65 72 20 4d | 69 63 72 6f 73 6f 66 74 | Under M|icrosoft|
|00000670| 20 43 0a 20 2a 20 20 20 | 20 20 20 63 67 61 2c 20 | C. * | cga, |
|00000680| 65 67 61 62 69 6f 73 2c | 20 65 67 61 6c 69 62 2c |egabios,| egalib,|
|00000690| 20 76 67 61 62 69 6f 73 | 2c 20 68 65 72 63 75 6c | vgabios|, hercul|
|000006a0| 65 73 2c 20 63 6f 72 6f | 6e 61 33 32 35 2c 20 61 |es, coro|na325, a|
|000006b0| 74 74 0a 20 2a 20 20 55 | 6e 64 65 72 20 54 75 72 |tt. * U|nder Tur|
|000006c0| 62 6f 63 20 43 0a 20 2a | 20 20 20 20 20 20 63 67 |boc C. *| cg|
|000006d0| 61 2c 20 65 67 61 2f 76 | 67 61 2c 20 76 67 61 6d |a, ega/v|ga, vgam|
|000006e0| 6f 6e 6f 2c 20 73 76 67 | 61 2c 20 6d 63 67 61 2c |ono, svg|a, mcga,|
|000006f0| 20 68 65 72 63 75 6c 65 | 73 2c 20 61 74 74 0a 20 | hercule|s, att. |
|00000700| 2a 20 20 55 6e 64 65 72 | 20 57 61 74 63 6f 6d 20 |* Under| Watcom |
|00000710| 43 0a 20 2a 20 20 20 20 | 20 20 63 67 61 2c 20 65 |C. * | cga, e|
|00000720| 67 61 2f 76 67 61 2c 20 | 76 67 61 6d 6f 6e 6f 2c |ga/vga, |vgamono,|
|00000730| 20 73 76 67 61 2c 20 6d | 63 67 61 2c 20 68 65 72 | svga, m|cga, her|
|00000740| 63 75 6c 65 73 2c 20 3f | 3f 3f 0a 20 2a 0a 20 2a |cules, ?|??. *. *|
|00000750| 20 41 55 54 48 4f 52 53 | 0a 20 2a 20 20 43 6f 6c | AUTHORS|. * Col|
|00000760| 69 6e 20 4b 65 6c 6c 65 | 79 2c 20 54 68 6f 6d 61 |in Kelle|y, Thoma|
|00000770| 73 20 57 69 6c 6c 69 61 | 6d 73 2c 20 57 69 6c 6c |s Willia|ms, Will|
|00000780| 69 61 6d 20 57 69 6c 73 | 6f 6e 2c 20 52 75 73 73 |iam Wils|on, Russ|
|00000790| 65 6c 6c 20 4c 61 6e 67 | 0a 20 2a 20 20 6d 6f 64 |ell Lang|. * mod|
|000007a0| 69 66 69 65 64 20 62 79 | 20 44 61 76 69 64 20 4a |ified by| David J|
|000007b0| 2e 20 4c 69 75 20 28 6c | 69 75 40 63 73 62 2e 79 |. Liu (l|iu@csb.y|
|000007c0| 61 6c 65 2e 65 64 75 29 | 20 66 6f 72 20 76 65 72 |ale.edu)| for ver|
|000007d0| 73 69 6f 6e 20 33 2e 36 | 0a 20 2a 0a 20 2a 20 73 |sion 3.6|. *. * s|
|000007e0| 65 6e 64 20 79 6f 75 72 | 20 63 6f 6d 6d 65 6e 74 |end your| comment|
|000007f0| 73 20 6f 72 20 73 75 67 | 67 65 73 74 69 6f 6e 73 |s or sug|gestions|
|00000800| 20 74 6f 20 28 69 6e 66 | 6f 2d 67 6e 75 70 6c 6f | to (inf|o-gnuplo|
|00000810| 74 40 64 61 72 74 6d 6f | 75 74 68 2e 65 64 75 29 |t@dartmo|uth.edu)|
|00000820| 2e 0a 20 2a 0a 20 2a 20 | 42 65 63 61 75 73 65 20 |.. *. * |Because |
|00000830| 6f 6e 6c 79 20 6f 6e 65 | 20 63 6f 6d 70 69 6c 65 |only one| compile|
|00000840| 72 20 69 73 20 75 73 65 | 64 20 74 6f 20 67 65 6e |r is use|d to gen|
|00000850| 65 72 61 74 65 20 67 6e | 75 70 6c 6f 74 2e 65 78 |erate gn|uplot.ex|
|00000860| 65 0a 20 2a 20 61 6e 64 | 20 74 68 65 20 74 79 70 |e. * and| the typ|
|00000870| 65 20 6f 66 20 74 68 65 | 20 73 69 6e 67 6c 65 20 |e of the| single |
|00000880| 67 72 61 70 68 69 63 73 | 20 62 6f 61 72 64 20 69 |graphics| board i|
|00000890| 73 20 61 75 74 6f 2d 64 | 65 74 65 63 74 65 64 2c |s auto-d|etected,|
|000008a0| 0a 20 2a 20 77 65 20 63 | 61 6e 20 63 6f 6d 62 69 |. * we c|an combi|
|000008b0| 6e 65 20 61 6c 6c 20 74 | 68 65 73 65 20 70 61 72 |ne all t|hese par|
|000008c0| 74 73 20 69 6e 74 6f 20 | 6f 6e 65 20 74 65 72 6d |ts into |one term|
|000008d0| 69 6e 61 6c 20 74 79 70 | 65 3a 20 50 43 0a 20 2a |inal typ|e: PC. *|
|000008e0| 20 61 6e 64 20 6c 65 74 | 20 74 68 65 20 63 6f 6d | and let| the com|
|000008f0| 70 75 74 65 72 20 74 61 | 6b 65 20 63 61 72 65 20 |puter ta|ke care |
|00000900| 6f 66 20 74 68 65 20 72 | 65 73 74 2e 20 20 2d 2d |of the r|est. --|
|00000910| 20 44 4a 4c 0a 20 2a 0a | 20 2a 20 53 69 6e 63 65 | DJL. *.| * Since|
|00000920| 20 49 20 64 6f 6e 27 74 | 20 68 61 76 65 20 4d 69 | I don't| have Mi|
|00000930| 63 72 6f 53 6f 66 74 20 | 43 2c 20 49 20 61 73 73 |croSoft |C, I ass|
|00000940| 75 6d 65 20 69 74 20 77 | 6f 75 6c 64 20 64 65 66 |ume it w|ould def|
|00000950| 69 6e 65 20 4d 53 43 2e | 0a 20 2a 20 50 6c 65 61 |ine MSC.|. * Plea|
|00000960| 73 65 20 63 6f 72 72 65 | 63 74 20 69 74 20 69 66 |se corre|ct it if|
|00000970| 20 79 6f 75 20 61 72 65 | 20 75 73 69 6e 67 20 4d | you are| using M|
|00000980| 53 20 43 2e 20 20 54 68 | 61 6e 6b 20 79 6f 75 2e |S C. Th|ank you.|
|00000990| 20 20 2d 2d 20 44 4a 4c | 0a 20 2a 0a 20 2a 2f 0a | -- DJL|. *. */.|
|000009a0| 0a 2f 2a 0a 20 2a 20 61 | 64 61 70 74 65 64 20 74 |./*. * a|dapted t|
|000009b0| 6f 20 74 68 65 20 6e 65 | 77 20 74 65 72 6d 69 6e |o the ne|w termin|
|000009c0| 61 6c 20 6c 61 79 6f 75 | 74 20 62 79 20 53 74 65 |al layou|t by Ste|
|000009d0| 66 61 6e 20 42 6f 64 65 | 77 69 67 20 28 44 65 63 |fan Bode|wig (Dec|
|000009e0| 2e 20 31 39 39 35 29 0a | 20 2a 2f 0a 0a 23 69 6e |. 1995).| */..#in|
|000009f0| 63 6c 75 64 65 20 22 64 | 72 69 76 65 72 2e 68 22 |clude "d|river.h"|
|00000a00| 0a 0a 23 69 66 64 65 66 | 20 54 45 52 4d 5f 52 45 |..#ifdef| TERM_RE|
|00000a10| 47 49 53 54 45 52 0a 72 | 65 67 69 73 74 65 72 5f |GISTER.r|egister_|
|00000a20| 74 65 72 6d 28 64 6f 73 | 70 63 29 0a 23 65 6e 64 |term(dos|pc).#end|
|00000a30| 69 66 0a 0a 23 69 66 64 | 65 66 20 54 45 52 4d 5f |if..#ifd|ef TERM_|
|00000a40| 50 52 4f 54 4f 0a 54 45 | 52 4d 5f 50 55 42 4c 49 |PROTO.TE|RM_PUBLI|
|00000a50| 43 20 76 6f 69 64 20 50 | 43 5f 74 65 78 74 20 5f |C void P|C_text _|
|00000a60| 5f 50 52 4f 54 4f 28 28 | 76 6f 69 64 29 29 3b 0a |_PROTO((|void));.|
|00000a70| 54 45 52 4d 5f 50 55 42 | 4c 49 43 20 76 6f 69 64 |TERM_PUB|LIC void|
|00000a80| 20 50 43 5f 72 65 73 65 | 74 20 5f 5f 50 52 4f 54 | PC_rese|t __PROT|
|00000a90| 4f 28 28 76 6f 69 64 29 | 29 3b 0a 54 45 52 4d 5f |O((void)|);.TERM_|
|00000aa0| 50 55 42 4c 49 43 20 76 | 6f 69 64 20 50 43 5f 69 |PUBLIC v|oid PC_i|
|00000ab0| 6e 69 74 20 5f 5f 50 52 | 4f 54 4f 28 28 76 6f 69 |nit __PR|OTO((voi|
|00000ac0| 64 29 29 3b 0a 54 45 52 | 4d 5f 50 55 42 4c 49 43 |d));.TER|M_PUBLIC|
|00000ad0| 20 76 6f 69 64 20 50 43 | 5f 67 72 61 70 68 69 63 | void PC|_graphic|
|00000ae0| 73 20 5f 5f 50 52 4f 54 | 4f 28 28 76 6f 69 64 29 |s __PROT|O((void)|
|00000af0| 29 3b 0a 54 45 52 4d 5f | 50 55 42 4c 49 43 20 76 |);.TERM_|PUBLIC v|
|00000b00| 6f 69 64 20 50 43 5f 6c | 69 6e 65 74 79 70 65 20 |oid PC_l|inetype |
|00000b10| 5f 5f 50 52 4f 54 4f 28 | 28 69 6e 74 20 6c 69 6e |__PROTO(|(int lin|
|00000b20| 65 74 79 70 65 29 29 3b | 0a 54 45 52 4d 5f 50 55 |etype));|.TERM_PU|
|00000b30| 42 4c 49 43 20 76 6f 69 | 64 20 50 43 5f 6d 6f 76 |BLIC voi|d PC_mov|
|00000b40| 65 20 5f 5f 50 52 4f 54 | 4f 28 28 69 6e 74 20 78 |e __PROT|O((int x|
|00000b50| 2c 20 69 6e 74 20 79 29 | 29 3b 0a 54 45 52 4d 5f |, int y)|);.TERM_|
|00000b60| 50 55 42 4c 49 43 20 76 | 6f 69 64 20 50 43 5f 76 |PUBLIC v|oid PC_v|
|00000b70| 65 63 74 6f 72 20 5f 5f | 50 52 4f 54 4f 28 28 69 |ector __|PROTO((i|
|00000b80| 6e 74 20 78 2c 20 69 6e | 74 20 79 29 29 3b 0a 54 |nt x, in|t y));.T|
|00000b90| 45 52 4d 5f 50 55 42 4c | 49 43 20 76 6f 69 64 20 |ERM_PUBL|IC void |
|00000ba0| 50 43 5f 70 75 74 5f 74 | 65 78 74 20 5f 5f 50 52 |PC_put_t|ext __PR|
|00000bb0| 4f 54 4f 28 28 69 6e 74 | 20 78 2c 20 69 6e 74 20 |OTO((int| x, int |
|00000bc0| 79 2c 20 63 68 61 72 20 | 2a 73 74 72 29 29 3b 0a |y, char |*str));.|
|00000bd0| 54 45 52 4d 5f 50 55 42 | 4c 49 43 20 69 6e 74 20 |TERM_PUB|LIC int |
|00000be0| 50 43 5f 74 65 78 74 5f | 61 6e 67 6c 65 20 5f 5f |PC_text_|angle __|
|00000bf0| 50 52 4f 54 4f 28 28 69 | 6e 74 20 61 6e 67 29 29 |PROTO((i|nt ang))|
|00000c00| 3b 0a 54 45 52 4d 5f 50 | 55 42 4c 49 43 20 69 6e |;.TERM_P|UBLIC in|
|00000c10| 74 20 50 43 5f 6a 75 73 | 74 69 66 79 5f 74 65 78 |t PC_jus|tify_tex|
|00000c20| 74 20 5f 5f 50 52 4f 54 | 4f 28 28 65 6e 75 6d 20 |t __PROT|O((enum |
|00000c30| 4a 55 53 54 49 46 59 20 | 61 6e 67 29 29 3b 0a 0a |JUSTIFY |ang));..|
|00000c40| 23 64 65 66 69 6e 65 20 | 50 43 5f 48 43 48 41 52 |#define |PC_HCHAR|
|00000c50| 20 46 4e 54 35 58 39 5f | 48 43 48 41 52 0a 23 64 | FNT5X9_|HCHAR.#d|
|00000c60| 65 66 69 6e 65 20 50 43 | 5f 56 43 48 41 52 20 46 |efine PC|_VCHAR F|
|00000c70| 4e 54 35 58 39 5f 56 43 | 48 41 52 0a 23 64 65 66 |NT5X9_VC|HAR.#def|
|00000c80| 69 6e 65 20 50 43 5f 48 | 54 49 43 20 35 0a 23 64 |ine PC_H|TIC 5.#d|
|00000c90| 65 66 69 6e 65 20 50 43 | 5f 56 54 49 43 20 34 0a |efine PC|_VTIC 4.|
|00000ca0| 23 64 65 66 69 6e 65 20 | 50 43 5f 58 4d 41 58 20 |#define |PC_XMAX |
|00000cb0| 31 30 30 09 09 2f 2a 20 | 54 68 65 73 65 20 74 77 |100../* |These tw|
|00000cc0| 6f 20 65 6e 74 72 69 65 | 73 20 61 72 65 20 6a 75 |o entrie|s are ju|
|00000cd0| 73 74 20 70 6c 61 63 65 | 20 68 6f 6c 64 65 72 73 |st place| holders|
|00000ce0| 2e 20 2a 2f 0a 23 64 65 | 66 69 6e 65 20 50 43 5f |. */.#de|fine PC_|
|00000cf0| 59 4d 41 58 20 31 30 30 | 09 09 2f 2a 20 54 68 65 |YMAX 100|../* The|
|00000d00| 20 61 63 74 75 61 6c 20 | 76 61 6c 75 65 73 20 77 | actual |values w|
|00000d10| 69 6c 6c 20 62 65 20 66 | 6f 75 6e 64 20 69 6e 20 |ill be f|ound in |
|00000d20| 69 6e 69 74 2e 20 20 2a | 2f 0a 23 65 6e 64 69 66 |init. *|/.#endif|
|00000d30| 20 2f 2a 20 54 45 52 4d | 5f 50 52 4f 54 4f 20 2a | /* TERM|_PROTO *|
|00000d40| 2f 0a 0a 23 69 66 6e 64 | 65 66 20 54 45 52 4d 5f |/..#ifnd|ef TERM_|
|00000d50| 50 52 4f 54 4f 5f 4f 4e | 4c 59 0a 23 69 66 64 65 |PROTO_ON|LY.#ifde|
|00000d60| 66 20 54 45 52 4d 5f 42 | 4f 44 59 0a 0a 23 69 66 |f TERM_B|ODY..#if|
|00000d70| 64 65 66 20 5f 5f 54 55 | 52 42 4f 43 5f 5f 0a 73 |def __TU|RBOC__.s|
|00000d80| 74 61 74 69 63 20 69 6e | 74 20 68 75 67 65 20 64 |tatic in|t huge d|
|00000d90| 65 74 65 63 74 5f 73 76 | 67 61 20 5f 5f 50 52 4f |etect_sv|ga __PRO|
|00000da0| 54 4f 28 28 76 6f 69 64 | 29 29 3b 0a 23 65 6e 64 |TO((void|));.#end|
|00000db0| 69 66 20 2f 2a 20 5f 5f | 54 55 52 42 4f 43 5f 5f |if /* __|TURBOC__|
|00000dc0| 20 2a 2f 0a 0a 23 69 6e | 63 6c 75 64 65 20 3c 73 | */..#in|clude <s|
|00000dd0| 74 72 69 6e 67 2e 68 3e | 0a 23 69 6e 63 6c 75 64 |tring.h>|.#includ|
|00000de0| 65 20 3c 73 74 64 6c 69 | 62 2e 68 3e 0a 23 69 66 |e <stdli|b.h>.#if|
|00000df0| 64 65 66 20 5f 5f 54 55 | 52 42 4f 43 5f 5f 0a 23 |def __TU|RBOC__.#|
|00000e00| 69 6e 63 6c 75 64 65 20 | 3c 67 72 61 70 68 69 63 |include |<graphic|
|00000e10| 73 2e 68 3e 0a 23 69 6e | 63 6c 75 64 65 20 3c 63 |s.h>.#in|clude <c|
|00000e20| 6f 6e 69 6f 2e 68 3e 0a | 23 69 6e 63 6c 75 64 65 |onio.h>.|#include|
|00000e30| 20 3c 64 6f 73 2e 68 3e | 0a 23 65 6e 64 69 66 20 | <dos.h>|.#endif |
|00000e40| 2f 2a 20 5f 5f 54 55 52 | 42 4f 43 5f 5f 20 2a 2f |/* __TUR|BOC__ */|
|00000e50| 0a 23 69 66 64 65 66 20 | 5f 5f 57 41 54 43 4f 4d |.#ifdef |__WATCOM|
|00000e60| 43 5f 5f 0a 23 69 6e 63 | 6c 75 64 65 20 3c 67 72 |C__.#inc|lude <gr|
|00000e70| 61 70 68 2e 68 3e 0a 23 | 65 6e 64 69 66 20 2f 2a |aph.h>.#|endif /*|
|00000e80| 20 57 41 54 43 4f 4d 43 | 20 2a 2f 0a 23 69 66 64 | WATCOMC| */.#ifd|
|00000e90| 65 66 20 4d 53 43 0a 23 | 69 6e 63 6c 75 64 65 20 |ef MSC.#|include |
|00000ea0| 22 6d 63 65 67 61 2e 68 | 22 0a 23 65 6e 64 69 66 |"mcega.h|".#endif|
|00000eb0| 20 2f 2a 20 4d 53 43 20 | 2a 2f 0a 0a 73 74 61 74 | /* MSC |*/..stat|
|00000ec0| 69 63 20 69 6e 74 20 70 | 61 74 74 65 72 6e 5b 5d |ic int p|attern[]|
|00000ed0| 20 3d 7b 20 30 78 66 66 | 66 66 2c 20 30 78 30 66 | ={ 0xff|ff, 0x0f|
|00000ee0| 30 66 2c 20 30 78 66 66 | 66 66 2c 20 30 78 61 61 |0f, 0xff|ff, 0xaa|
|00000ef0| 61 61 2c 20 30 78 33 33 | 33 33 2c 20 30 78 33 66 |aa, 0x33|33, 0x3f|
|00000f00| 33 66 2c 20 30 78 30 66 | 30 66 20 7d 3b 0a 73 74 |3f, 0x0f|0f };.st|
|00000f10| 61 74 69 63 20 69 6e 74 | 20 76 67 61 5f 63 6f 6c |atic int| vga_col|
|00000f20| 6f 72 5b 5d 20 3d 7b 20 | 37 2c 20 38 2c 20 32 2c |or[] ={ |7, 8, 2,|
|00000f30| 20 33 2c 20 34 2c 20 35 | 2c 20 39 2c 20 31 34 2c | 3, 4, 5|, 9, 14,|
|00000f40| 20 31 32 2c 20 31 35 2c | 20 31 33 2c 20 31 30 2c | 12, 15,| 13, 10,|
|00000f50| 20 31 31 2c 20 31 2c 20 | 36 20 7d 3b 0a 0a 73 74 | 11, 1, |6 };..st|
|00000f60| 61 74 69 63 20 69 6e 74 | 20 70 63 5f 64 72 69 76 |atic int| pc_driv|
|00000f70| 65 72 2c 20 70 63 5f 6d | 6f 64 65 3b 0a 73 74 61 |er, pc_m|ode;.sta|
|00000f80| 74 69 63 20 69 6e 74 20 | 67 72 61 70 68 69 63 73 |tic int |graphics|
|00000f90| 5f 6f 6e 20 3d 20 46 41 | 4c 53 45 2c 20 70 63 5f |_on = FA|LSE, pc_|
|00000fa0| 67 72 61 70 68 69 63 73 | 20 3d 20 46 41 4c 53 45 |graphics| = FALSE|
|00000fb0| 3b 0a 73 74 61 74 69 63 | 20 69 6e 74 20 73 74 61 |;.static| int sta|
|00000fc0| 72 74 78 2c 20 73 74 61 | 72 74 79 2c 20 70 63 5f |rtx, sta|rty, pc_|
|00000fd0| 6c 61 73 74 78 2c 20 70 | 63 5f 6c 61 73 74 79 2c |lastx, p|c_lasty,|
|00000fe0| 20 70 63 5f 63 6f 6c 6f | 72 73 3b 0a 73 74 61 74 | pc_colo|rs;.stat|
|00000ff0| 69 63 20 69 6e 74 20 70 | 63 5f 61 6e 67 6c 65 2c |ic int p|c_angle,|
|00001000| 20 70 63 5f 68 6a 75 73 | 74 69 66 79 2c 20 70 63 | pc_hjus|tify, pc|
|00001010| 5f 76 6a 75 73 74 69 66 | 79 2c 20 70 63 5f 74 65 |_vjustif|y, pc_te|
|00001020| 78 74 5f 73 69 7a 65 2c | 20 70 63 5f 74 65 78 74 |xt_size,| pc_text|
|00001030| 5f 64 69 72 2c 20 70 63 | 5f 63 6f 72 73 63 72 65 |_dir, pc|_corscre|
|00001040| 65 6e 20 3d 20 2d 31 3b | 0a 0a 0a 23 69 66 64 65 |en = -1;|...#ifde|
|00001050| 66 20 5f 5f 54 55 52 42 | 4f 43 5f 5f 0a 65 78 74 |f __TURB|OC__.ext|
|00001060| 65 72 6e 20 69 6e 74 20 | 66 61 72 20 5f 43 64 65 |ern int |far _Cde|
|00001070| 63 6c 20 53 56 47 41 5f | 64 72 69 76 65 72 5f 66 |cl SVGA_|driver_f|
|00001080| 61 72 5b 5d 3b 0a 23 65 | 6e 64 69 66 20 2f 2a 20 |ar[];.#e|ndif /* |
|00001090| 5f 5f 54 55 52 42 4f 43 | 5f 5f 20 2a 2f 0a 0a 23 |__TURBOC|__ */..#|
|000010a0| 69 66 64 65 66 20 5f 5f | 57 41 54 43 4f 4d 43 5f |ifdef __|WATCOMC_|
|000010b0| 5f 0a 65 6e 75 6d 20 7b | 0a 20 20 20 20 48 4f 52 |_.enum {|. HOR|
|000010c0| 49 5a 5f 44 49 52 2c 20 | 56 45 52 54 5f 44 49 52 |IZ_DIR, |VERT_DIR|
|000010d0| 0a 7d 3b 0a 73 74 61 74 | 69 63 20 76 6f 69 64 20 |.};.stat|ic void |
|000010e0| 5f 73 65 74 74 65 78 74 | 61 6e 67 28 61 6e 67 29 |_settext|ang(ang)|
|000010f0| 0a 69 6e 74 20 61 6e 67 | 3b 0a 7b 0a 20 20 20 20 |.int ang|;.{. |
|00001100| 69 66 20 28 61 6e 67 20 | 3d 3d 20 48 4f 52 49 5a |if (ang |== HORIZ|
|00001110| 5f 44 49 52 29 20 7b 0a | 09 5f 73 65 74 74 65 78 |_DIR) {.|._settex|
|00001120| 74 6f 72 69 65 6e 74 28 | 31 2c 20 30 29 3b 0a 20 |torient(|1, 0);. |
|00001130| 20 20 20 7d 20 65 6c 73 | 65 20 7b 0a 09 5f 73 65 | } els|e {.._se|
|00001140| 74 74 65 78 74 6f 72 69 | 65 6e 74 28 30 2c 20 31 |ttextori|ent(0, 1|
|00001150| 29 3b 0a 20 20 20 20 7d | 0a 7d 0a 23 65 6e 64 69 |);. }|.}.#endi|
|00001160| 66 20 2f 2a 20 57 41 54 | 43 4f 4d 43 20 2a 2f 0a |f /* WAT|COMC */.|
|00001170| 0a 73 74 61 74 69 63 20 | 69 6e 74 20 68 75 67 65 |.static |int huge|
|00001180| 20 64 65 74 65 63 74 5f | 73 76 67 61 28 76 6f 69 | detect_|svga(voi|
|00001190| 64 29 0a 7b 0a 20 20 20 | 20 72 65 74 75 72 6e 20 |d).{. | return |
|000011a0| 30 3b 09 09 09 2f 2a 20 | 74 68 65 20 64 65 66 61 |0;.../* |the defa|
|000011b0| 75 6c 74 20 6d 6f 64 65 | 2c 20 6a 75 73 74 20 61 |ult mode|, just a|
|000011c0| 20 70 6c 61 63 65 20 68 | 6f 6c 64 65 72 20 2a 2f | place h|older */|
|000011d0| 0a 7d 0a 0a 76 6f 69 64 | 20 50 43 5f 73 65 74 75 |.}..void| PC_setu|
|000011e0| 70 28 29 0a 7b 09 09 09 | 09 2f 2a 20 63 61 6c 6c |p().{...|./* call|
|000011f0| 65 64 20 66 72 6f 6d 20 | 74 68 65 20 62 65 67 69 |ed from |the begi|
|00001200| 6e 6e 69 6e 67 20 6f 66 | 20 6d 61 69 6e 28 29 20 |nning of| main() |
|00001210| 2a 2f 0a 20 20 20 20 69 | 6e 74 20 69 2c 20 74 2c |*/. i|nt i, t,|
|00001220| 20 78 2c 20 79 3b 0a 20 | 20 20 20 63 68 61 72 20 | x, y;. | char |
|00001230| 70 63 5f 6d 6f 64 65 6e | 61 6d 65 5b 39 5d 3b 0a |pc_moden|ame[9];.|
|00001240| 23 69 66 64 65 66 20 5f | 5f 57 41 54 43 4f 4d 43 |#ifdef _|_WATCOMC|
|00001250| 5f 5f 0a 20 20 20 20 73 | 74 72 75 63 74 20 76 69 |__. s|truct vi|
|00001260| 64 65 6f 63 6f 6e 66 69 | 67 20 56 43 3b 0a 23 65 |deoconfi|g VC;.#e|
|00001270| 6e 64 69 66 20 2f 2a 20 | 57 41 54 43 4f 4d 43 20 |ndif /* |WATCOMC |
|00001280| 2a 2f 0a 0a 20 20 20 20 | 2f 2a 20 46 69 72 73 74 |*/.. |/* First|
|00001290| 20 6c 69 6e 6b 20 61 6c | 6c 20 42 52 49 20 64 72 | link al|l BRI dr|
|000012a0| 69 62 65 72 73 2c 20 74 | 68 65 6e 20 64 65 74 65 |ibers, t|hen dete|
|000012b0| 63 74 20 74 68 65 20 64 | 69 73 70 6c 61 79 20 63 |ct the d|isplay c|
|000012c0| 61 72 64 2e 20 2a 2f 0a | 20 20 20 20 2f 2a 20 49 |ard. */.| /* I|
|000012d0| 66 20 65 6e 76 69 72 6f | 6e 6d 65 6e 74 20 50 43 |f enviro|nment PC|
|000012e0| 54 52 4d 20 69 73 20 73 | 65 74 2c 20 74 72 79 20 |TRM is s|et, try |
|000012f0| 69 6e 69 74 69 61 74 65 | 20 74 68 65 20 63 61 72 |initiate| the car|
|00001300| 64 2f 6d 6f 64 65 2e 20 | 20 2a 2f 0a 0a 20 20 20 |d/mode. | */.. |
|00001310| 20 2f 2a 20 73 70 65 63 | 69 61 6c 20 69 6e 73 74 | /* spec|ial inst|
|00001320| 72 75 63 74 69 6f 6e 20 | 6f 6e 20 6d 6f 64 65 20 |ruction |on mode |
|00001330| 2a 2f 0a 20 20 20 20 73 | 61 66 65 5f 73 74 72 6e |*/. s|afe_strn|
|00001340| 63 70 79 28 70 63 5f 6d | 6f 64 65 6e 61 6d 65 2c |cpy(pc_m|odename,|
|00001350| 20 67 65 74 65 6e 76 28 | 22 50 43 54 52 4d 22 29 | getenv(|"PCTRM")|
|00001360| 2c 20 38 29 3b 0a 0a 23 | 69 66 64 65 66 20 5f 5f |, 8);..#|ifdef __|
|00001370| 54 55 52 42 4f 43 5f 5f | 0a 20 20 20 20 2f 2a 20 |TURBOC__|. /* |
|00001380| 53 6f 6d 65 20 6f 66 20 | 74 68 69 73 20 63 6f 64 |Some of |this cod|
|00001390| 65 20 69 6e 63 6c 75 64 | 69 6e 67 20 42 47 49 20 |e includ|ing BGI |
|000013a0| 64 72 69 76 65 72 73 20 | 61 72 65 20 63 6f 70 79 |drivers |are copy|
|000013b0| 72 69 67 68 74 20 42 6f | 72 6c 61 6e 64 20 49 6e |right Bo|rland In|
|000013c0| 74 6c 2e 20 2a 2f 0a 20 | 20 20 20 72 65 67 69 73 |tl. */. | regis|
|000013d0| 74 65 72 66 61 72 62 67 | 69 64 72 69 76 65 72 28 |terfarbg|idriver(|
|000013e0| 45 47 41 56 47 41 5f 64 | 72 69 76 65 72 5f 66 61 |EGAVGA_d|river_fa|
|000013f0| 72 29 3b 0a 20 20 20 20 | 72 65 67 69 73 74 65 72 |r);. |register|
|00001400| 66 61 72 62 67 69 64 72 | 69 76 65 72 28 43 47 41 |farbgidr|iver(CGA|
|00001410| 5f 64 72 69 76 65 72 5f | 66 61 72 29 3b 0a 20 20 |_driver_|far);. |
|00001420| 20 20 72 65 67 69 73 74 | 65 72 66 61 72 62 67 69 | regist|erfarbgi|
|00001430| 64 72 69 76 65 72 28 48 | 65 72 63 5f 64 72 69 76 |driver(H|erc_driv|
|00001440| 65 72 5f 66 61 72 29 3b | 0a 20 20 20 20 72 65 67 |er_far);|. reg|
|00001450| 69 73 74 65 72 66 61 72 | 62 67 69 64 72 69 76 65 |isterfar|bgidrive|
|00001460| 72 28 41 54 54 5f 64 72 | 69 76 65 72 5f 66 61 72 |r(ATT_dr|iver_far|
|00001470| 29 3b 0a 20 20 20 20 72 | 65 67 69 73 74 65 72 66 |);. r|egisterf|
|00001480| 61 72 62 67 69 64 72 69 | 76 65 72 28 50 43 33 32 |arbgidri|ver(PC32|
|00001490| 37 30 5f 64 72 69 76 65 | 72 5f 66 61 72 29 3b 0a |70_drive|r_far);.|
|000014a0| 20 20 20 20 70 63 5f 64 | 72 69 76 65 72 20 3d 20 | pc_d|river = |
|000014b0| 44 45 54 45 43 54 3b 0a | 20 20 20 20 64 65 74 65 |DETECT;.| dete|
|000014c0| 63 74 67 72 61 70 68 28 | 26 70 63 5f 64 72 69 76 |ctgraph(|&pc_driv|
|000014d0| 65 72 2c 20 26 70 63 5f | 6d 6f 64 65 29 3b 0a 20 |er, &pc_|mode);. |
|000014e0| 20 20 20 69 66 20 28 67 | 72 61 70 68 72 65 73 75 | if (g|raphresu|
|000014f0| 6c 74 28 29 29 20 7b 0a | 09 66 70 75 74 73 28 22 |lt()) {.|.fputs("|
|00001500| 55 6e 61 62 6c 65 20 74 | 6f 20 69 6e 69 74 69 61 |Unable t|o initia|
|00001510| 6c 69 7a 65 20 67 72 61 | 70 68 69 63 73 2e 5c 6e |lize gra|phics.\n|
|00001520| 22 2c 20 73 74 64 65 72 | 72 29 3b 0a 09 72 65 74 |", stder|r);..ret|
|00001530| 75 72 6e 3b 0a 20 20 20 | 20 7d 0a 23 69 66 64 65 |urn;. | }.#ifde|
|00001540| 66 20 42 47 49 5f 4e 41 | 4d 45 0a 2f 2a 20 74 68 |f BGI_NA|ME./* th|
|00001550| 65 20 68 69 67 68 65 73 | 74 20 73 74 61 6e 64 61 |e highes|t standa|
|00001560| 72 64 20 70 63 5f 64 72 | 69 76 65 72 20 76 61 6c |rd pc_dr|iver val|
|00001570| 75 65 2c 20 73 65 65 20 | 67 72 61 70 68 69 63 73 |ue, see |graphics|
|00001580| 2e 68 20 2a 2f 0a 23 64 | 65 66 69 6e 65 20 4c 41 |.h */.#d|efine LA|
|00001590| 53 54 5f 42 47 49 20 31 | 30 0a 2f 2a 20 74 68 65 |ST_BGI 1|0./* the|
|000015a0| 20 6c 61 73 74 20 6d 6f | 64 65 20 6f 66 20 74 68 | last mo|de of th|
|000015b0| 65 20 53 56 47 41 2e 42 | 47 49 20 2a 2f 0a 23 64 |e SVGA.B|GI */.#d|
|000015c0| 65 66 69 6e 65 20 4c 41 | 53 54 5f 53 56 47 41 5f |efine LA|ST_SVGA_|
|000015d0| 4d 4f 44 45 20 36 0a 20 | 20 20 20 2f 2a 20 74 65 |MODE 6. | /* te|
|000015e0| 73 74 20 53 56 47 41 20 | 69 66 20 77 65 20 68 61 |st SVGA |if we ha|
|000015f0| 76 65 20 56 47 41 20 2a | 2f 0a 20 20 20 20 69 66 |ve VGA *|/. if|
|00001600| 20 28 28 70 63 5f 64 72 | 69 76 65 72 20 3d 3d 20 | ((pc_dr|iver == |
|00001610| 56 47 41 29 20 26 26 20 | 28 70 63 5f 6d 6f 64 65 |VGA) && |(pc_mode|
|00001620| 6e 61 6d 65 5b 30 5d 20 | 3d 3d 20 27 53 27 29 29 |name[0] |== 'S'))|
|00001630| 20 7b 0a 09 69 6e 73 74 | 61 6c 6c 75 73 65 72 64 | {..inst|alluserd|
|00001640| 72 69 76 65 72 28 42 47 | 49 5f 4e 41 4d 45 2c 20 |river(BG|I_NAME, |
|00001650| 26 64 65 74 65 63 74 5f | 73 76 67 61 29 3b 0a 09 |&detect_|svga);..|
|00001660| 72 65 67 69 73 74 65 72 | 66 61 72 62 67 69 64 72 |register|farbgidr|
|00001670| 69 76 65 72 28 53 56 47 | 41 5f 64 72 69 76 65 72 |iver(SVG|A_driver|
|00001680| 5f 66 61 72 29 3b 0a 09 | 70 63 5f 64 72 69 76 65 |_far);..|pc_drive|
|00001690| 72 20 3d 20 44 45 54 45 | 43 54 3b 0a 09 69 6e 69 |r = DETE|CT;..ini|
|000016a0| 74 67 72 61 70 68 28 26 | 70 63 5f 64 72 69 76 65 |tgraph(&|pc_drive|
|000016b0| 72 2c 20 26 70 63 5f 6d | 6f 64 65 2c 20 22 22 29 |r, &pc_m|ode, "")|
|000016c0| 3b 0a 20 20 20 20 20 20 | 20 20 2f 2a 20 54 68 65 |;. | /* The|
|000016d0| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 63 6f 64 65 2c | followi|ng code,|
|000016e0| 20 77 68 69 63 68 20 69 | 73 20 69 6e 64 65 70 65 | which i|s indepe|
|000016f0| 6e 64 65 6e 74 20 6f 66 | 20 74 68 65 20 61 63 74 |ndent of| the act|
|00001700| 75 61 6c 20 53 56 47 41 | 2e 42 47 49 0a 09 20 2a |ual SVGA|.BGI.. *|
|00001710| 20 75 73 65 64 2c 20 74 | 72 69 65 73 20 74 6f 20 | used, t|ries to |
|00001720| 66 69 6e 64 20 61 20 6d | 6f 64 65 20 6f 66 20 77 |find a m|ode of w|
|00001730| 69 64 74 68 20 64 65 66 | 69 6e 65 64 20 69 6e 20 |idth def|ined in |
|00001740| 74 68 65 20 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 0a |the envi|ronment.|
|00001750| 09 20 2a 20 76 61 72 69 | 61 62 6c 65 20 50 43 54 |. * vari|able PCT|
|00001760| 52 4d 20 2a 2f 0a 09 69 | 66 20 28 70 63 5f 64 72 |RM */..i|f (pc_dr|
|00001770| 69 76 65 72 20 3e 20 4c | 41 53 54 5f 42 47 49 29 |iver > L|AST_BGI)|
|00001780| 20 7b 09 2f 2a 20 73 75 | 63 63 65 73 73 20 2a 2f | {./* su|ccess */|
|00001790| 0a 09 20 20 20 20 73 73 | 63 61 6e 66 28 70 63 5f |.. ss|canf(pc_|
|000017a0| 6d 6f 64 65 6e 61 6d 65 | 2c 20 22 53 25 64 22 2c |modename|, "S%d",|
|000017b0| 20 26 74 29 3b 0a 09 20 | 20 20 20 73 77 69 74 63 | &t);.. | switc|
|000017c0| 68 20 28 74 29 20 7b 0a | 09 20 20 20 20 63 61 73 |h (t) {.|. cas|
|000017d0| 65 20 38 30 30 3a 0a 09 | 09 62 72 65 61 6b 3b 09 |e 800:..|.break;.|
|000017e0| 09 2f 2a 20 53 38 30 30 | 20 20 2a 2f 0a 09 20 20 |./* S800| */.. |
|000017f0| 20 20 63 61 73 65 20 31 | 30 32 34 3a 0a 09 09 62 | case 1|024:...b|
|00001800| 72 65 61 6b 3b 09 09 2f | 2a 20 53 31 30 32 34 20 |reak;../|* S1024 |
|00001810| 2a 2f 0a 09 20 20 20 20 | 63 61 73 65 20 31 32 38 |*/.. |case 128|
|00001820| 30 3a 0a 09 09 62 72 65 | 61 6b 3b 09 09 2f 2a 20 |0:...bre|ak;../* |
|00001830| 53 31 32 38 30 20 2a 2f | 0a 09 20 20 20 20 64 65 |S1280 */|.. de|
|00001840| 66 61 75 6c 74 3a 0a 09 | 09 74 20 3d 20 36 34 30 |fault:..|.t = 640|
|00001850| 3b 09 2f 2a 20 36 34 30 | 78 34 38 30 20 2a 2f 0a |;./* 640|x480 */.|
|00001860| 09 20 20 20 20 7d 0a 09 | 20 20 20 20 66 6f 72 20 |. }..| for |
|00001870| 28 69 20 3d 20 30 3b 20 | 69 20 3c 3d 20 4c 41 53 |(i = 0; |i <= LAS|
|00001880| 54 5f 53 56 47 41 5f 4d | 4f 44 45 3b 20 69 2b 2b |T_SVGA_M|ODE; i++|
|00001890| 29 20 7b 0a 09 09 73 65 | 74 67 72 61 70 68 6d 6f |) {...se|tgraphmo|
|000018a0| 64 65 28 69 29 3b 0a 09 | 09 69 66 20 28 28 67 65 |de(i);..|.if ((ge|
|000018b0| 74 6d 61 78 78 28 29 20 | 2b 20 31 20 3d 3d 20 74 |tmaxx() |+ 1 == t|
|000018c0| 29 20 26 26 20 28 67 65 | 74 6d 61 78 63 6f 6c 6f |) && (ge|tmaxcolo|
|000018d0| 72 28 29 20 3e 20 31 34 | 29 29 0a 09 09 20 20 20 |r() > 14|))... |
|000018e0| 20 70 63 5f 6d 6f 64 65 | 20 3d 20 69 3b 0a 09 20 | pc_mode| = i;.. |
|000018f0| 20 20 20 7d 0a 09 20 20 | 20 20 73 65 74 67 72 61 | }.. | setgra|
|00001900| 70 68 6d 6f 64 65 28 70 | 63 5f 6d 6f 64 65 29 3b |phmode(p|c_mode);|
|00001910| 0a 09 20 20 20 20 69 66 | 20 28 67 72 61 70 68 72 |.. if| (graphr|
|00001920| 65 73 75 6c 74 28 29 29 | 20 7b 09 2f 2a 20 65 72 |esult())| {./* er|
|00001930| 72 6f 72 2c 20 67 6f 20 | 62 61 63 6b 20 74 6f 20 |ror, go |back to |
|00001940| 56 47 41 20 2a 2f 0a 09 | 09 70 63 5f 64 72 69 76 |VGA */..|.pc_driv|
|00001950| 65 72 20 3d 20 56 47 41 | 3b 0a 09 09 70 63 5f 6d |er = VGA|;...pc_m|
|00001960| 6f 64 65 20 3d 20 34 3b | 0a 09 20 20 20 20 7d 0a |ode = 4;|.. }.|
|00001970| 09 7d 0a 20 20 20 20 7d | 09 09 09 09 2f 2a 20 53 |.}. }|..../* S|
|00001980| 56 47 41 20 74 65 73 74 | 65 64 20 2a 2f 0a 20 20 |VGA test|ed */. |
|00001990| 20 20 69 66 20 28 70 63 | 5f 64 72 69 76 65 72 20 | if (pc|_driver |
|000019a0| 3c 3d 20 4c 41 53 54 5f | 42 47 49 29 0a 23 65 6e |<= LAST_|BGI).#en|
|000019b0| 64 69 66 20 2f 2a 20 42 | 47 49 5f 4e 41 4d 45 20 |dif /* B|GI_NAME |
|000019c0| 2a 2f 0a 09 69 6e 69 74 | 67 72 61 70 68 28 26 70 |*/..init|graph(&p|
|000019d0| 63 5f 64 72 69 76 65 72 | 2c 20 26 70 63 5f 6d 6f |c_driver|, &pc_mo|
|000019e0| 64 65 2c 20 22 22 29 3b | 0a 20 20 20 20 70 63 5f |de, "");|. pc_|
|000019f0| 63 6f 6c 6f 72 73 20 3d | 20 67 65 74 6d 61 78 63 |colors =| getmaxc|
|00001a00| 6f 6c 6f 72 28 29 20 2b | 20 31 3b 0a 20 20 20 20 |olor() +| 1;. |
|00001a10| 70 63 5f 6c 61 73 74 78 | 20 3d 20 67 65 74 6d 61 |pc_lastx| = getma|
|00001a20| 78 78 28 29 3b 0a 20 20 | 20 20 70 63 5f 6c 61 73 |xx();. | pc_las|
|00001a30| 74 79 20 3d 20 67 65 74 | 6d 61 78 79 28 29 3b 0a |ty = get|maxy();.|
|00001a40| 20 20 20 20 72 65 73 74 | 6f 72 65 63 72 74 6d 6f | rest|orecrtmo|
|00001a50| 64 65 28 29 3b 0a 20 20 | 20 20 63 6c 72 73 63 72 |de();. | clrscr|
|00001a60| 28 29 3b 0a 23 65 6e 64 | 69 66 20 2f 2a 20 5f 5f |();.#end|if /* __|
|00001a70| 54 55 52 42 4f 43 5f 5f | 20 2a 2f 0a 23 69 66 64 |TURBOC__| */.#ifd|
|00001a80| 65 66 20 5f 5f 57 41 54 | 43 4f 4d 43 5f 5f 0a 20 |ef __WAT|COMC__. |
|00001a90| 20 20 20 5f 67 65 74 76 | 69 64 65 6f 63 6f 6e 66 | _getv|ideoconf|
|00001aa0| 69 67 28 26 56 43 29 3b | 0a 20 20 20 20 69 66 20 |ig(&VC);|. if |
|00001ab0| 28 28 70 63 5f 64 72 69 | 76 65 72 20 3d 20 56 43 |((pc_dri|ver = VC|
|00001ac0| 2e 61 64 61 70 74 65 72 | 29 20 3d 3d 20 30 29 20 |.adapter|) == 0) |
|00001ad0| 7b 0a 09 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |{..fprin|tf(stder|
|00001ae0| 72 2c 20 22 55 6e 61 62 | 6c 65 20 74 6f 20 69 6e |r, "Unab|le to in|
|00001af0| 69 74 69 61 6c 69 7a 65 | 20 67 72 61 70 68 69 63 |itialize| graphic|
|00001b00| 73 2e 5c 6e 22 29 3b 0a | 09 72 65 74 75 72 6e 3b |s.\n");.|.return;|
|00001b10| 0a 20 20 20 20 7d 0a 20 | 20 20 20 73 77 69 74 63 |. }. | switc|
|00001b20| 68 20 28 70 63 5f 64 72 | 69 76 65 72 20 3d 20 56 |h (pc_dr|iver = V|
|00001b30| 43 2e 61 64 61 70 74 65 | 72 29 20 7b 0a 20 20 20 |C.adapte|r) {. |
|00001b40| 20 63 61 73 65 20 5f 48 | 45 52 43 55 4c 45 53 3a | case _H|ERCULES:|
|00001b50| 0a 09 70 63 5f 6d 6f 64 | 65 20 3d 20 5f 48 45 52 |..pc_mod|e = _HER|
|00001b60| 43 4d 4f 4e 4f 3b 0a 09 | 62 72 65 61 6b 3b 0a 20 |CMONO;..|break;. |
|00001b70| 20 20 20 63 61 73 65 20 | 5f 43 47 41 3a 0a 09 70 | case |_CGA:..p|
|00001b80| 63 5f 6d 6f 64 65 20 3d | 20 5f 48 52 45 53 42 57 |c_mode =| _HRESBW|
|00001b90| 3b 0a 09 62 72 65 61 6b | 3b 0a 20 20 20 20 63 61 |;..break|;. ca|
|00001ba0| 73 65 20 5f 4d 43 47 41 | 3a 0a 09 70 63 5f 6d 6f |se _MCGA|:..pc_mo|
|00001bb0| 64 65 20 3d 20 5f 4d 52 | 45 53 32 35 36 43 4f 4c |de = _MR|ES256COL|
|00001bc0| 4f 52 3b 0a 09 62 72 65 | 61 6b 3b 0a 20 20 20 20 |OR;..bre|ak;. |
|00001bd0| 63 61 73 65 20 5f 45 47 | 41 3a 0a 09 70 63 5f 6d |case _EG|A:..pc_m|
|00001be0| 6f 64 65 20 3d 20 28 56 | 43 2e 6d 6f 6e 69 74 6f |ode = (V|C.monito|
|00001bf0| 72 20 3d 3d 20 5f 4d 4f | 4e 4f 20 3f 20 5f 45 52 |r == _MO|NO ? _ER|
|00001c00| 45 53 43 4f 4c 4f 52 20 | 3a 20 5f 45 52 45 53 4e |ESCOLOR |: _ERESN|
|00001c10| 4f 43 4f 4c 4f 52 29 3b | 0a 09 62 72 65 61 6b 3b |OCOLOR);|..break;|
|00001c20| 0a 20 20 20 20 63 61 73 | 65 20 5f 56 47 41 3a 0a |. cas|e _VGA:.|
|00001c30| 09 70 63 5f 6d 6f 64 65 | 20 3d 20 5f 56 52 45 53 |.pc_mode| = _VRES|
|00001c40| 31 36 43 4f 4c 4f 52 3b | 0a 09 62 72 65 61 6b 3b |16COLOR;|..break;|
|00001c50| 0a 20 20 20 20 63 61 73 | 65 20 5f 53 56 47 41 3a |. cas|e _SVGA:|
|00001c60| 0a 09 69 66 20 28 70 63 | 5f 6d 6f 64 65 6e 61 6d |..if (pc|_modenam|
|00001c70| 65 5b 30 5d 20 3d 3d 20 | 27 53 27 29 20 7b 09 2f |e[0] == |'S') {./|
|00001c80| 2a 20 74 65 73 74 20 53 | 56 47 41 20 72 65 73 6f |* test S|VGA reso|
|00001c90| 6c 75 74 69 6f 6e 20 2a | 2f 0a 09 20 20 20 20 73 |lution *|/.. s|
|00001ca0| 73 63 61 6e 66 28 70 63 | 5f 6d 6f 64 65 6e 61 6d |scanf(pc|_modenam|
|00001cb0| 65 2c 20 22 53 25 64 22 | 2c 20 26 74 29 3b 0a 09 |e, "S%d"|, &t);..|
|00001cc0| 20 20 20 20 73 77 69 74 | 63 68 20 28 74 29 20 7b | swit|ch (t) {|
|00001cd0| 0a 09 20 20 20 20 63 61 | 73 65 20 38 30 30 3a 0a |.. ca|se 800:.|
|00001ce0| 09 09 70 63 5f 6d 6f 64 | 65 20 3d 20 5f 53 56 52 |..pc_mod|e = _SVR|
|00001cf0| 45 53 32 35 36 43 4f 4c | 4f 52 3b 0a 09 09 62 72 |ES256COL|OR;...br|
|00001d00| 65 61 6b 3b 09 09 2f 2a | 20 53 38 30 30 20 20 2a |eak;../*| S800 *|
|00001d10| 2f 0a 09 20 20 20 20 63 | 61 73 65 20 31 30 32 34 |/.. c|ase 1024|
|00001d20| 3a 0a 09 09 70 63 5f 6d | 6f 64 65 20 3d 20 5f 58 |:...pc_m|ode = _X|
|00001d30| 52 45 53 32 35 36 43 4f | 4c 4f 52 3b 0a 09 09 62 |RES256CO|LOR;...b|
|00001d40| 72 65 61 6b 3b 09 09 2f | 2a 20 53 31 30 32 34 20 |reak;../|* S1024 |
|00001d50| 2a 2f 0a 09 20 20 20 20 | 63 61 73 65 20 31 32 38 |*/.. |case 128|
|00001d60| 30 3a 0a 09 09 70 63 5f | 6d 6f 64 65 20 3d 20 5f |0:...pc_|mode = _|
|00001d70| 58 52 45 53 32 35 36 43 | 4f 4c 4f 52 20 2b 20 32 |XRES256C|OLOR + 2|
|00001d80| 3b 0a 09 09 62 72 65 61 | 6b 3b 09 09 2f 2a 20 53 |;...brea|k;../* S|
|00001d90| 31 32 38 30 20 2a 2f 0a | 09 09 2f 2a 20 53 6f 6d |1280 */.|../* Som|
|00001da0| 65 6f 6e 65 20 68 65 6c | 70 20 6d 65 2c 20 77 68 |eone hel|p me, wh|
|00001db0| 6f 20 6b 6e 6f 77 73 2c | 20 68 6f 77 20 61 20 6e |o knows,| how a n|
|00001dc0| 65 77 65 72 20 57 61 74 | 63 6f 6d 20 63 61 6c 6c |ewer Wat|com call|
|00001dd0| 73 20 74 68 61 74 20 2a | 2f 0a 09 20 20 20 20 64 |s that *|/.. d|
|00001de0| 65 66 61 75 6c 74 3a 0a | 09 09 74 20 3d 20 36 34 |efault:.|..t = 64|
|00001df0| 30 3b 0a 09 09 70 63 5f | 6d 6f 64 65 20 3d 20 5f |0;...pc_|mode = _|
|00001e00| 56 52 45 53 32 35 36 43 | 4f 4c 4f 52 3b 09 2f 2a |VRES256C|OLOR;./*|
|00001e10| 20 36 34 30 78 34 38 30 | 20 2a 2f 0a 09 20 20 20 | 640x480| */.. |
|00001e20| 20 7d 0a 09 20 20 20 20 | 77 68 69 6c 65 20 28 5f | }.. |while (_|
|00001e30| 73 65 74 76 69 64 65 6f | 6d 6f 64 65 28 70 63 5f |setvideo|mode(pc_|
|00001e40| 6d 6f 64 65 29 20 3d 3d | 20 30 29 0a 09 09 70 63 |mode) ==| 0)...pc|
|00001e50| 5f 6d 6f 64 65 2d 2d 3b | 0a 09 7d 0a 09 62 72 65 |_mode--;|..}..bre|
|00001e60| 61 6b 3b 0a 20 20 20 20 | 64 65 66 61 75 6c 74 3a |ak;. |default:|
|00001e70| 0a 09 66 70 75 74 73 28 | 22 55 6e 61 62 6c 65 20 |..fputs(|"Unable |
|00001e80| 74 6f 20 69 6e 69 74 69 | 61 6c 69 7a 65 20 67 72 |to initi|alize gr|
|00001e90| 61 70 68 69 63 73 2e 5c | 6e 22 2c 20 73 74 64 65 |aphics.\|n", stde|
|00001ea0| 72 72 29 3b 0a 09 72 65 | 74 75 72 6e 3b 0a 20 20 |rr);..re|turn;. |
|00001eb0| 20 20 7d 0a 20 20 20 20 | 5f 73 65 74 76 69 64 65 | }. |_setvide|
|00001ec0| 6f 6d 6f 64 65 28 70 63 | 5f 6d 6f 64 65 29 3b 0a |omode(pc|_mode);.|
|00001ed0| 20 20 20 20 5f 67 65 74 | 76 69 64 65 6f 63 6f 6e | _get|videocon|
|00001ee0| 66 69 67 28 26 56 43 29 | 3b 0a 20 20 20 20 70 63 |fig(&VC)|;. pc|
|00001ef0| 5f 6c 61 73 74 78 20 3d | 20 56 43 2e 6e 75 6d 78 |_lastx =| VC.numx|
|00001f00| 70 69 78 65 6c 73 20 2d | 20 31 3b 0a 20 20 20 20 |pixels -| 1;. |
|00001f10| 70 63 5f 6c 61 73 74 79 | 20 3d 20 56 43 2e 6e 75 |pc_lasty| = VC.nu|
|00001f20| 6d 79 70 69 78 65 6c 73 | 20 2d 20 31 3b 0a 20 20 |mypixels| - 1;. |
|00001f30| 20 20 70 63 5f 63 6f 6c | 6f 72 73 20 3d 20 56 43 | pc_col|ors = VC|
|00001f40| 2e 6e 75 6d 63 6f 6c 6f | 72 73 3b 0a 20 20 20 20 |.numcolo|rs;. |
|00001f50| 5f 73 65 74 76 69 64 65 | 6f 6d 6f 64 65 28 5f 44 |_setvide|omode(_D|
|00001f60| 45 46 41 55 4c 54 4d 4f | 44 45 29 3b 0a 23 65 6e |EFAULTMO|DE);.#en|
|00001f70| 64 69 66 20 2f 2a 20 57 | 41 54 43 4f 4d 43 20 2a |dif /* W|ATCOMC *|
|00001f80| 2f 0a 20 20 20 20 78 20 | 3d 20 70 63 5f 6c 61 73 |/. x |= pc_las|
|00001f90| 74 78 20 2b 20 31 3b 0a | 20 20 20 20 79 20 3d 20 |tx + 1;.| y = |
|00001fa0| 70 63 5f 6c 61 73 74 79 | 20 2b 20 31 3b 0a 20 20 |pc_lasty| + 1;. |
|00001fb0| 20 20 66 70 72 69 6e 74 | 66 28 73 74 64 65 72 72 | fprint|f(stderr|
|00001fc0| 2c 20 22 5c 74 53 63 72 | 65 65 6e 20 6f 66 20 25 |, "\tScr|een of %|
|00001fd0| 64 20 78 20 25 64 20 70 | 69 78 65 6c 73 20 61 6e |d x %d p|ixels an|
|00001fe0| 64 20 25 64 20 63 6f 6c | 6f 72 73 2e 5c 6e 22 2c |d %d col|ors.\n",|
|00001ff0| 0a 09 20 20 20 20 78 2c | 20 79 2c 20 70 63 5f 63 |.. x,| y, pc_c|
|00002000| 6f 6c 6f 72 73 29 3b 0a | 20 20 20 20 70 63 5f 67 |olors);.| pc_g|
|00002010| 72 61 70 68 69 63 73 20 | 3d 20 54 52 55 45 3b 0a |raphics |= TRUE;.|
|00002020| 7d 0a 0a 54 45 52 4d 5f | 50 55 42 4c 49 43 20 76 |}..TERM_|PUBLIC v|
|00002030| 6f 69 64 20 50 43 5f 69 | 6e 69 74 28 29 0a 7b 0a |oid PC_i|nit().{.|
|00002040| 20 20 20 20 63 68 61 72 | 20 2a 70 61 74 68 70 3b | char| *pathp;|
|00002050| 0a 23 69 66 64 65 66 20 | 5f 5f 57 41 54 43 4f 4d |.#ifdef |__WATCOM|
|00002060| 43 5f 5f 0a 20 20 20 20 | 73 74 72 75 63 74 20 5f |C__. |struct _|
|00002070| 66 6f 6e 74 69 6e 66 6f | 20 66 69 3b 0a 23 65 6e |fontinfo| fi;.#en|
|00002080| 64 69 66 0a 0a 20 20 20 | 20 69 66 20 28 21 70 63 |dif.. | if (!pc|
|00002090| 5f 67 72 61 70 68 69 63 | 73 29 20 7b 0a 09 66 70 |_graphic|s) {..fp|
|000020a0| 75 74 73 28 22 55 6e 61 | 62 6c 65 20 74 6f 20 69 |uts("Una|ble to i|
|000020b0| 6e 69 74 69 61 6c 69 7a | 65 20 67 72 61 70 68 69 |nitializ|e graphi|
|000020c0| 63 73 2e 5c 6e 22 2c 20 | 73 74 64 65 72 72 29 3b |cs.\n", |stderr);|
|000020d0| 0a 09 74 65 72 6d 20 3d | 20 30 3b 0a 09 72 65 74 |..term =| 0;..ret|
|000020e0| 75 72 6e 3b 0a 20 20 20 | 20 7d 0a 20 20 20 20 2f |urn;. | }. /|
|000020f0| 2a 20 44 6f 75 62 6c 65 | 20 74 68 65 20 74 69 63 |* Double| the tic|
|00002100| 2f 66 6f 6e 74 20 73 69 | 7a 65 73 2e 20 2a 2f 0a |/font si|zes. */.|
|00002110| 20 20 20 20 70 63 5f 74 | 65 78 74 5f 73 69 7a 65 | pc_t|ext_size|
|00002120| 20 3d 20 28 70 63 5f 6c | 61 73 74 79 20 3e 20 35 | = (pc_l|asty > 5|
|00002130| 39 30 29 20 3f 20 32 20 | 3a 20 31 3b 0a 20 20 20 |90) ? 2 |: 1;. |
|00002140| 20 74 65 72 6d 2d 3e 68 | 5f 63 68 61 72 20 3d 20 | term->h|_char = |
|00002150| 50 43 5f 48 43 48 41 52 | 3b 0a 20 20 20 20 74 65 |PC_HCHAR|;. te|
|00002160| 72 6d 2d 3e 76 5f 63 68 | 61 72 20 3d 20 50 43 5f |rm->v_ch|ar = PC_|
|00002170| 56 43 48 41 52 3b 0a 20 | 20 20 20 74 65 72 6d 2d |VCHAR;. | term-|
|00002180| 3e 68 5f 74 69 63 20 3d | 20 50 43 5f 48 54 49 43 |>h_tic =| PC_HTIC|
|00002190| 20 2a 20 70 63 5f 74 65 | 78 74 5f 73 69 7a 65 3b | * pc_te|xt_size;|
|000021a0| 0a 20 20 20 20 74 65 72 | 6d 2d 3e 76 5f 74 69 63 |. ter|m->v_tic|
|000021b0| 20 3d 20 50 43 5f 56 54 | 49 43 20 2a 20 70 63 5f | = PC_VT|IC * pc_|
|000021c0| 74 65 78 74 5f 73 69 7a | 65 3b 0a 20 20 20 20 74 |text_siz|e;. t|
|000021d0| 65 72 6d 2d 3e 78 6d 61 | 78 20 3d 20 70 63 5f 6c |erm->xma|x = pc_l|
|000021e0| 61 73 74 78 20 2b 20 31 | 3b 0a 20 20 20 20 74 65 |astx + 1|;. te|
|000021f0| 72 6d 2d 3e 79 6d 61 78 | 20 3d 20 70 63 5f 6c 61 |rm->ymax| = pc_la|
|00002200| 73 74 79 20 2b 20 31 3b | 0a 23 69 66 64 65 66 20 |sty + 1;|.#ifdef |
|00002210| 5f 5f 54 55 52 42 4f 43 | 5f 5f 0a 20 20 20 20 73 |__TURBOC|__. s|
|00002220| 65 74 67 72 61 70 68 6d | 6f 64 65 28 70 63 5f 6d |etgraphm|ode(pc_m|
|00002230| 6f 64 65 29 3b 0a 20 20 | 20 20 73 65 74 74 65 78 |ode);. | settex|
|00002240| 74 73 74 79 6c 65 28 44 | 45 46 41 55 4c 54 5f 46 |tstyle(D|EFAULT_F|
|00002250| 4f 4e 54 2c 20 48 4f 52 | 49 5a 5f 44 49 52 2c 20 |ONT, HOR|IZ_DIR, |
|00002260| 70 63 5f 74 65 78 74 5f | 73 69 7a 65 29 3b 0a 20 |pc_text_|size);. |
|00002270| 20 20 20 73 65 74 74 65 | 78 74 6a 75 73 74 69 66 | sette|xtjustif|
|00002280| 79 28 70 63 5f 68 6a 75 | 73 74 69 66 79 2c 20 70 |y(pc_hju|stify, p|
|00002290| 63 5f 76 6a 75 73 74 69 | 66 79 29 3b 0a 20 20 20 |c_vjusti|fy);. |
|000022a0| 20 74 65 72 6d 2d 3e 68 | 5f 63 68 61 72 20 3d 20 | term->h|_char = |
|000022b0| 74 65 78 74 68 65 69 67 | 68 74 28 22 58 22 29 3b |textheig|ht("X");|
|000022c0| 09 2f 2a 20 6f 76 65 72 | 72 69 64 69 6e 67 20 74 |./* over|riding t|
|000022d0| 68 65 20 64 65 66 61 75 | 6c 74 20 2a 2f 0a 20 20 |he defau|lt */. |
|000022e0| 20 20 74 65 72 6d 2d 3e | 76 5f 63 68 61 72 20 3d | term->|v_char =|
|000022f0| 20 74 65 78 74 77 69 64 | 74 68 28 22 58 22 29 3b | textwid|th("X");|
|00002300| 09 2f 2a 20 6f 76 65 72 | 72 69 64 69 6e 67 20 74 |./* over|riding t|
|00002310| 68 65 20 64 65 66 61 75 | 6c 74 20 2a 2f 0a 23 65 |he defau|lt */.#e|
|00002320| 6e 64 69 66 20 2f 2a 20 | 5f 5f 54 55 52 42 4f 43 |ndif /* |__TURBOC|
|00002330| 5f 5f 20 2a 2f 0a 23 69 | 66 64 65 66 20 5f 5f 57 |__ */.#i|fdef __W|
|00002340| 41 54 43 4f 4d 43 5f 5f | 0a 20 20 20 20 5f 73 65 |ATCOMC__|. _se|
|00002350| 74 76 69 64 65 6f 6d 6f | 64 65 28 70 63 5f 6d 6f |tvideomo|de(pc_mo|
|00002360| 64 65 29 3b 0a 20 20 20 | 20 5f 73 65 74 74 65 78 |de);. | _settex|
|00002370| 74 61 6e 67 28 48 4f 52 | 49 5a 5f 44 49 52 29 3b |tang(HOR|IZ_DIR);|
|00002380| 0a 20 20 20 20 5f 73 65 | 74 74 65 78 74 61 6c 69 |. _se|ttextali|
|00002390| 67 6e 28 70 63 5f 68 6a | 75 73 74 69 66 79 2c 20 |gn(pc_hj|ustify, |
|000023a0| 70 63 5f 76 6a 75 73 74 | 69 66 79 29 3b 0a 20 20 |pc_vjust|ify);. |
|000023b0| 20 20 5f 73 65 74 63 68 | 61 72 73 69 7a 65 28 70 | _setch|arsize(p|
|000023c0| 63 5f 74 65 78 74 5f 73 | 69 7a 65 20 2a 20 50 43 |c_text_s|ize * PC|
|000023d0| 5f 48 43 48 41 52 2c 20 | 70 63 5f 74 65 78 74 5f |_HCHAR, |pc_text_|
|000023e0| 73 69 7a 65 20 2a 20 50 | 43 5f 56 43 48 41 52 29 |size * P|C_VCHAR)|
|000023f0| 3b 0a 20 20 20 20 5f 67 | 65 74 66 6f 6e 74 69 6e |;. _g|etfontin|
|00002400| 66 6f 28 26 66 69 29 3b | 0a 20 20 20 20 74 65 72 |fo(&fi);|. ter|
|00002410| 6d 2d 3e 68 5f 63 68 61 | 72 20 3d 20 66 69 2e 61 |m->h_cha|r = fi.a|
|00002420| 76 67 77 69 64 74 68 3b | 0a 20 20 20 20 74 65 72 |vgwidth;|. ter|
|00002430| 6d 2d 3e 76 5f 63 68 61 | 72 20 3d 20 66 69 2e 70 |m->v_cha|r = fi.p|
|00002440| 69 78 68 65 69 67 68 74 | 20 2a 20 31 2e 35 3b 0a |ixheight| * 1.5;.|
|00002450| 23 65 6e 64 69 66 20 2f | 2a 20 57 41 54 43 4f 4d |#endif /|* WATCOM|
|00002460| 43 20 2a 2f 0a 23 69 66 | 64 65 66 20 4d 53 43 0a |C */.#if|def MSC.|
|00002470| 23 65 6e 64 69 66 20 2f | 2a 20 4d 53 43 20 2a 2f |#endif /|* MSC */|
|00002480| 0a 7d 0a 0a 54 45 52 4d | 5f 50 55 42 4c 49 43 20 |.}..TERM|_PUBLIC |
|00002490| 76 6f 69 64 20 50 43 5f | 67 72 61 70 68 69 63 73 |void PC_|graphics|
|000024a0| 28 29 0a 7b 0a 20 20 20 | 20 67 72 61 70 68 69 63 |().{. | graphic|
|000024b0| 73 5f 6f 6e 20 3d 20 54 | 52 55 45 3b 0a 23 69 66 |s_on = T|RUE;.#if|
|000024c0| 64 65 66 20 5f 5f 54 55 | 52 42 4f 43 5f 5f 0a 20 |def __TU|RBOC__. |
|000024d0| 20 20 20 73 65 74 67 72 | 61 70 68 6d 6f 64 65 28 | setgr|aphmode(|
|000024e0| 70 63 5f 6d 6f 64 65 29 | 3b 0a 23 65 6e 64 69 66 |pc_mode)|;.#endif|
|000024f0| 20 2f 2a 20 5f 5f 54 55 | 52 42 4f 43 5f 5f 20 2a | /* __TU|RBOC__ *|
|00002500| 2f 0a 23 69 66 64 65 66 | 20 5f 5f 57 41 54 43 4f |/.#ifdef| __WATCO|
|00002510| 4d 43 5f 5f 0a 20 20 20 | 20 5f 73 65 74 76 69 64 |MC__. | _setvid|
|00002520| 65 6f 6d 6f 64 65 28 70 | 63 5f 6d 6f 64 65 29 3b |eomode(p|c_mode);|
|00002530| 0a 23 65 6e 64 69 66 20 | 2f 2a 20 57 41 54 43 4f |.#endif |/* WATCO|
|00002540| 4d 43 20 2a 2f 0a 23 69 | 66 64 65 66 20 4d 53 43 |MC */.#i|fdef MSC|
|00002550| 0a 20 20 20 20 69 66 20 | 28 70 63 5f 63 6f 72 73 |. if |(pc_cors|
|00002560| 63 72 65 65 6e 20 3d 3d | 20 2d 31 29 0a 09 56 6d |creen ==| -1)..Vm|
|00002570| 6f 64 65 28 31 38 29 3b | 09 09 2f 2a 20 56 47 41 |ode(18);|../* VGA|
|00002580| 20 2a 2f 0a 20 20 20 20 | 65 6c 73 65 20 7b 0a 09 | */. |else {..|
|00002590| 67 72 69 6e 69 74 28 63 | 6f 72 73 63 72 65 65 6e |grinit(c|orscreen|
|000025a0| 29 3b 0a 09 67 72 61 6e | 64 74 78 28 29 3b 0a 20 |);..gran|dtx();. |
|000025b0| 20 20 20 7d 09 09 09 09 | 2f 2a 20 63 6f 72 6f 6c | }....|/* corol|
|000025c0| 6c 61 20 2a 2f 0a 23 65 | 6e 64 69 66 20 2f 2a 20 |la */.#e|ndif /* |
|000025d0| 4d 53 43 20 2a 2f 0a 7d | 0a 0a 54 45 52 4d 5f 50 |MSC */.}|..TERM_P|
|000025e0| 55 42 4c 49 43 20 76 6f | 69 64 20 50 43 5f 6c 69 |UBLIC vo|id PC_li|
|000025f0| 6e 65 74 79 70 65 28 6c | 69 6e 65 74 79 70 65 29 |netype(l|inetype)|
|00002600| 0a 7b 0a 20 20 20 20 69 | 66 20 28 70 63 5f 63 6f |.{. i|f (pc_co|
|00002610| 6c 6f 72 73 20 3e 20 31 | 34 29 20 7b 09 2f 2a 20 |lors > 1|4) {./* |
|00002620| 31 36 20 6f 72 20 6d 6f | 72 65 20 63 6f 6c 6f 72 |16 or mo|re color|
|00002630| 73 20 2a 2f 0a 09 69 66 | 20 28 6c 69 6e 65 74 79 |s */..if| (linety|
|00002640| 70 65 20 3e 3d 20 31 33 | 29 0a 09 20 20 20 20 6c |pe >= 13|).. l|
|00002650| 69 6e 65 74 79 70 65 20 | 25 3d 20 31 33 3b 0a 23 |inetype |%= 13;.#|
|00002660| 69 66 64 65 66 20 5f 5f | 54 55 52 42 4f 43 5f 5f |ifdef __|TURBOC__|
|00002670| 0a 09 73 65 74 63 6f 6c | 6f 72 28 76 67 61 5f 63 |..setcol|or(vga_c|
|00002680| 6f 6c 6f 72 5b 6c 69 6e | 65 74 79 70 65 20 2b 20 |olor[lin|etype + |
|00002690| 32 5d 29 3b 0a 23 65 6e | 64 69 66 20 2f 2a 20 5f |2]);.#en|dif /* _|
|000026a0| 5f 54 55 52 42 4f 43 5f | 5f 20 2a 2f 0a 23 69 66 |_TURBOC_|_ */.#if|
|000026b0| 64 65 66 20 5f 5f 57 41 | 54 43 4f 4d 43 5f 5f 0a |def __WA|TCOMC__.|
|000026c0| 09 5f 73 65 74 63 6f 6c | 6f 72 28 76 67 61 5f 63 |._setcol|or(vga_c|
|000026d0| 6f 6c 6f 72 5b 6c 69 6e | 65 74 79 70 65 20 2b 20 |olor[lin|etype + |
|000026e0| 32 5d 29 3b 0a 23 65 6e | 64 69 66 20 2f 2a 20 57 |2]);.#en|dif /* W|
|000026f0| 41 54 43 4f 4d 43 20 2a | 2f 0a 23 69 66 64 65 66 |ATCOMC *|/.#ifdef|
|00002700| 20 4d 53 43 0a 23 65 6e | 64 69 66 20 2f 2a 20 4d | MSC.#en|dif /* M|
|00002710| 53 43 20 2a 2f 0a 20 20 | 20 20 7d 20 65 6c 73 65 |SC */. | } else|
|00002720| 20 7b 09 09 09 2f 2a 20 | 4d 4f 4e 4f 20 2a 2f 0a | {.../* |MONO */.|
|00002730| 09 69 66 20 28 6c 69 6e | 65 74 79 70 65 20 3e 3d |.if (lin|etype >=|
|00002740| 20 35 29 0a 09 20 20 20 | 20 6c 69 6e 65 74 79 70 | 5).. | linetyp|
|00002750| 65 20 25 3d 20 35 3b 0a | 23 69 66 64 65 66 20 5f |e %= 5;.|#ifdef _|
|00002760| 5f 54 55 52 42 4f 43 5f | 5f 0a 09 73 65 74 6c 69 |_TURBOC_|_..setli|
|00002770| 6e 65 73 74 79 6c 65 28 | 34 2c 20 70 61 74 74 65 |nestyle(|4, patte|
|00002780| 72 6e 5b 6c 69 6e 65 74 | 79 70 65 20 2b 20 32 5d |rn[linet|ype + 2]|
|00002790| 2c 20 31 29 3b 0a 23 65 | 6e 64 69 66 20 2f 2a 20 |, 1);.#e|ndif /* |
|000027a0| 5f 5f 54 55 52 42 4f 43 | 5f 5f 20 2a 2f 0a 23 69 |__TURBOC|__ */.#i|
|000027b0| 66 64 65 66 20 5f 5f 57 | 41 54 43 4f 4d 43 5f 5f |fdef __W|ATCOMC__|
|000027c0| 0a 09 5f 73 65 74 6c 69 | 6e 65 73 74 79 6c 65 28 |.._setli|nestyle(|
|000027d0| 70 61 74 74 65 72 6e 5b | 6c 69 6e 65 74 79 70 65 |pattern[|linetype|
|000027e0| 20 2b 20 32 5d 29 3b 0a | 23 65 6e 64 69 66 20 2f | + 2]);.|#endif /|
|000027f0| 2a 20 57 41 54 43 4f 4d | 43 20 2a 2f 0a 23 69 66 |* WATCOM|C */.#if|
|00002800| 64 65 66 20 4d 53 43 0a | 09 69 66 20 28 70 63 5f |def MSC.|.if (pc_|
|00002810| 63 6f 72 73 63 72 65 65 | 6e 20 21 3d 20 2d 31 29 |corscree|n != -1)|
|00002820| 0a 09 20 20 20 20 43 6f | 72 5f 6d 61 73 6b 28 70 |.. Co|r_mask(p|
|00002830| 61 74 74 65 72 6e 5b 6c | 69 6e 65 74 79 70 65 20 |attern[l|inetype |
|00002840| 2b 20 32 5d 29 3b 0a 23 | 65 6e 64 69 66 20 2f 2a |+ 2]);.#|endif /*|
|00002850| 20 4d 53 43 20 2a 2f 0a | 20 20 20 20 7d 0a 7d 0a | MSC */.| }.}.|
|00002860| 0a 54 45 52 4d 5f 50 55 | 42 4c 49 43 20 76 6f 69 |.TERM_PU|BLIC voi|
|00002870| 64 20 50 43 5f 6d 6f 76 | 65 28 78 2c 20 79 29 0a |d PC_mov|e(x, y).|
|00002880| 69 6e 74 20 78 2c 20 79 | 3b 0a 7b 0a 23 69 66 64 |int x, y|;.{.#ifd|
|00002890| 65 66 20 5f 5f 54 55 52 | 42 4f 43 5f 5f 0a 20 20 |ef __TUR|BOC__. |
|000028a0| 20 20 6d 6f 76 65 74 6f | 28 78 2c 20 70 63 5f 6c | moveto|(x, pc_l|
|000028b0| 61 73 74 79 20 2d 20 79 | 29 3b 0a 23 65 6e 64 69 |asty - y|);.#endi|
|000028c0| 66 20 2f 2a 20 5f 5f 54 | 55 52 42 4f 43 5f 5f 20 |f /* __T|URBOC__ |
|000028d0| 2a 2f 0a 23 69 66 64 65 | 66 20 5f 5f 57 41 54 43 |*/.#ifde|f __WATC|
|000028e0| 4f 4d 43 5f 5f 0a 20 20 | 20 20 5f 6d 6f 76 65 74 |OMC__. | _movet|
|000028f0| 6f 28 78 2c 20 70 63 5f | 6c 61 73 74 79 20 2d 20 |o(x, pc_|lasty - |
|00002900| 79 29 3b 0a 23 65 6e 64 | 69 66 20 2f 2a 20 57 41 |y);.#end|if /* WA|
|00002910| 54 43 4f 4d 43 20 2a 2f | 0a 23 69 66 64 65 66 20 |TCOMC */|.#ifdef |
|00002920| 4d 53 43 0a 23 65 6e 64 | 69 66 20 2f 2a 20 4d 53 |MSC.#end|if /* MS|
|00002930| 43 20 2a 2f 0a 20 20 20 | 20 73 74 61 72 74 78 20 |C */. | startx |
|00002940| 3d 20 78 3b 0a 20 20 20 | 20 73 74 61 72 74 79 20 |= x;. | starty |
|00002950| 3d 20 79 3b 0a 7d 0a 0a | 54 45 52 4d 5f 50 55 42 |= y;.}..|TERM_PUB|
|00002960| 4c 49 43 20 76 6f 69 64 | 20 50 43 5f 76 65 63 74 |LIC void| PC_vect|
|00002970| 6f 72 28 78 2c 20 79 29 | 0a 69 6e 74 20 78 2c 20 |or(x, y)|.int x, |
|00002980| 79 3b 0a 7b 0a 23 69 66 | 64 65 66 20 5f 5f 54 55 |y;.{.#if|def __TU|
|00002990| 52 42 4f 43 5f 5f 0a 20 | 20 20 20 6c 69 6e 65 74 |RBOC__. | linet|
|000029a0| 6f 28 78 2c 20 70 63 5f | 6c 61 73 74 79 20 2d 20 |o(x, pc_|lasty - |
|000029b0| 79 29 3b 0a 23 65 6e 64 | 69 66 20 2f 2a 20 5f 5f |y);.#end|if /* __|
|000029c0| 54 55 52 42 4f 43 5f 5f | 20 2a 2f 0a 23 69 66 64 |TURBOC__| */.#ifd|
|000029d0| 65 66 20 5f 5f 57 41 54 | 43 4f 4d 43 5f 5f 0a 20 |ef __WAT|COMC__. |
|000029e0| 20 20 20 5f 6c 69 6e 65 | 74 6f 28 78 2c 20 70 63 | _line|to(x, pc|
|000029f0| 5f 6c 61 73 74 79 20 2d | 20 79 29 3b 0a 23 65 6e |_lasty -| y);.#en|
|00002a00| 64 69 66 20 2f 2a 20 57 | 41 54 43 4f 4d 43 20 2a |dif /* W|ATCOMC *|
|00002a10| 2f 0a 23 69 66 64 65 66 | 20 4d 53 43 0a 20 20 20 |/.#ifdef| MSC. |
|00002a20| 20 69 66 20 28 70 63 5f | 63 6f 72 73 63 72 65 65 | if (pc_|corscree|
|00002a30| 6e 20 21 3d 20 2d 31 29 | 0a 09 43 6f 72 5f 6c 69 |n != -1)|..Cor_li|
|00002a40| 6e 65 28 73 74 61 72 74 | 78 2c 20 43 4f 52 5f 59 |ne(start|x, COR_Y|
|00002a50| 4c 41 53 54 20 2d 20 73 | 74 61 72 74 79 2c 20 78 |LAST - s|tarty, x|
|00002a60| 2c 20 43 4f 52 5f 59 4c | 41 53 54 20 2d 20 79 29 |, COR_YL|AST - y)|
|00002a70| 3b 0a 23 65 6e 64 69 66 | 20 2f 2a 20 4d 53 43 20 |;.#endif| /* MSC |
|00002a80| 2a 2f 0a 20 20 20 20 73 | 74 61 72 74 78 20 3d 20 |*/. s|tartx = |
|00002a90| 78 3b 0a 20 20 20 20 73 | 74 61 72 74 79 20 3d 20 |x;. s|tarty = |
|00002aa0| 79 3b 0a 7d 0a 0a 54 45 | 52 4d 5f 50 55 42 4c 49 |y;.}..TE|RM_PUBLI|
|00002ab0| 43 20 76 6f 69 64 20 50 | 43 5f 72 65 73 65 74 28 |C void P|C_reset(|
|00002ac0| 29 0a 7b 0a 20 20 20 20 | 67 72 61 70 68 69 63 73 |).{. |graphics|
|00002ad0| 5f 6f 6e 20 3d 20 46 41 | 4c 53 45 3b 0a 23 69 66 |_on = FA|LSE;.#if|
|00002ae0| 64 65 66 20 5f 5f 54 55 | 52 42 4f 43 5f 5f 0a 20 |def __TU|RBOC__. |
|00002af0| 20 20 20 72 65 73 74 6f | 72 65 63 72 74 6d 6f 64 | resto|recrtmod|
|00002b00| 65 28 29 3b 0a 20 20 20 | 20 63 6c 72 73 63 72 28 |e();. | clrscr(|
|00002b10| 29 3b 0a 23 65 6e 64 69 | 66 20 2f 2a 20 5f 5f 54 |);.#endi|f /* __T|
|00002b20| 55 52 42 4f 43 5f 5f 20 | 2a 2f 0a 23 69 66 64 65 |URBOC__ |*/.#ifde|
|00002b30| 66 20 5f 5f 57 41 54 43 | 4f 4d 43 5f 5f 0a 20 20 |f __WATC|OMC__. |
|00002b40| 20 20 5f 73 65 74 76 69 | 64 65 6f 6d 6f 64 65 28 | _setvi|deomode(|
|00002b50| 5f 44 45 46 41 55 4c 54 | 4d 4f 44 45 29 3b 0a 23 |_DEFAULT|MODE);.#|
|00002b60| 65 6e 64 69 66 20 2f 2a | 20 57 41 54 43 4f 4d 43 |endif /*| WATCOMC|
|00002b70| 20 2a 2f 0a 23 69 66 64 | 65 66 20 4d 53 43 0a 20 | */.#ifd|ef MSC. |
|00002b80| 20 20 20 56 6d 6f 64 65 | 28 33 29 3b 0a 23 65 6e | Vmode|(3);.#en|
|00002b90| 64 69 66 20 2f 2a 20 4d | 53 43 20 2a 2f 0a 7d 0a |dif /* M|SC */.}.|
|00002ba0| 0a 54 45 52 4d 5f 50 55 | 42 4c 49 43 20 76 6f 69 |.TERM_PU|BLIC voi|
|00002bb0| 64 20 50 43 5f 74 65 78 | 74 28 29 0a 7b 0a 20 20 |d PC_tex|t().{. |
|00002bc0| 20 20 69 66 20 28 67 72 | 61 70 68 69 63 73 5f 6f | if (gr|aphics_o|
|00002bd0| 6e 29 20 7b 0a 09 67 72 | 61 70 68 69 63 73 5f 6f |n) {..gr|aphics_o|
|00002be0| 6e 20 3d 20 46 41 4c 53 | 45 3b 0a 09 28 76 6f 69 |n = FALS|E;..(voi|
|00002bf0| 64 29 20 67 65 74 63 68 | 28 29 3b 0a 23 69 66 64 |d) getch|();.#ifd|
|00002c00| 65 66 20 5f 5f 54 55 52 | 42 4f 43 5f 5f 0a 09 72 |ef __TUR|BOC__..r|
|00002c10| 65 73 74 6f 72 65 63 72 | 74 6d 6f 64 65 28 29 3b |estorecr|tmode();|
|00002c20| 0a 09 63 6c 72 73 63 72 | 28 29 3b 0a 23 65 6e 64 |..clrscr|();.#end|
|00002c30| 69 66 20 2f 2a 20 5f 5f | 54 55 52 42 4f 43 5f 5f |if /* __|TURBOC__|
|00002c40| 20 2a 2f 0a 23 69 66 64 | 65 66 20 5f 5f 57 41 54 | */.#ifd|ef __WAT|
|00002c50| 43 4f 4d 43 5f 5f 0a 09 | 5f 73 65 74 76 69 64 65 |COMC__..|_setvide|
|00002c60| 6f 6d 6f 64 65 28 5f 44 | 45 46 41 55 4c 54 4d 4f |omode(_D|EFAULTMO|
|00002c70| 44 45 29 3b 0a 23 65 6e | 64 69 66 20 2f 2a 20 57 |DE);.#en|dif /* W|
|00002c80| 41 54 43 4f 4d 43 20 2a | 2f 0a 23 69 66 64 65 66 |ATCOMC *|/.#ifdef|
|00002c90| 20 4d 53 43 0a 09 69 66 | 20 28 70 63 5f 63 6f 72 | MSC..if| (pc_cor|
|00002ca0| 73 63 72 65 65 6e 20 21 | 3d 20 2d 31 29 20 7b 0a |screen !|= -1) {.|
|00002cb0| 09 20 20 20 20 67 72 72 | 65 73 65 74 28 29 3b 0a |. grr|eset();.|
|00002cc0| 09 20 20 20 20 74 78 6f | 6e 6c 79 28 29 3b 0a 09 |. txo|nly();..|
|00002cd0| 7d 0a 09 56 6d 6f 64 65 | 28 33 29 3b 0a 23 65 6e |}..Vmode|(3);.#en|
|00002ce0| 64 69 66 20 2f 2a 20 4d | 53 43 20 2a 2f 0a 20 20 |dif /* M|SC */. |
|00002cf0| 20 20 7d 0a 7d 0a 0a 54 | 45 52 4d 5f 50 55 42 4c | }.}..T|ERM_PUBL|
|00002d00| 49 43 20 69 6e 74 20 50 | 43 5f 74 65 78 74 5f 61 |IC int P|C_text_a|
|00002d10| 6e 67 6c 65 28 61 6e 67 | 29 0a 69 6e 74 20 61 6e |ngle(ang|).int an|
|00002d20| 67 3b 0a 7b 0a 20 20 20 | 20 73 77 69 74 63 68 20 |g;.{. | switch |
|00002d30| 28 61 6e 67 29 20 7b 0a | 20 20 20 20 63 61 73 65 |(ang) {.| case|
|00002d40| 20 30 3a 0a 09 70 63 5f | 74 65 78 74 5f 64 69 72 | 0:..pc_|text_dir|
|00002d50| 20 3d 20 48 4f 52 49 5a | 5f 44 49 52 3b 0a 09 62 | = HORIZ|_DIR;..b|
|00002d60| 72 65 61 6b 3b 0a 20 20 | 20 20 63 61 73 65 20 31 |reak;. | case 1|
|00002d70| 3a 0a 09 70 63 5f 74 65 | 78 74 5f 64 69 72 20 3d |:..pc_te|xt_dir =|
|00002d80| 20 56 45 52 54 5f 44 49 | 52 3b 0a 09 62 72 65 61 | VERT_DI|R;..brea|
|00002d90| 6b 3b 0a 20 20 20 20 7d | 0a 20 20 20 20 72 65 74 |k;. }|. ret|
|00002da0| 75 72 6e 20 54 52 55 45 | 3b 0a 7d 0a 0a 54 45 52 |urn TRUE|;.}..TER|
|00002db0| 4d 5f 50 55 42 4c 49 43 | 20 69 6e 74 20 50 43 5f |M_PUBLIC| int PC_|
|00002dc0| 6a 75 73 74 69 66 79 5f | 74 65 78 74 28 6a 75 73 |justify_|text(jus|
|00002dd0| 74 29 0a 65 6e 75 6d 20 | 4a 55 53 54 49 46 59 20 |t).enum |JUSTIFY |
|00002de0| 6a 75 73 74 3b 0a 7b 0a | 23 69 66 20 64 65 66 69 |just;.{.|#if defi|
|00002df0| 6e 65 64 28 5f 5f 54 55 | 52 42 4f 43 5f 5f 29 0a |ned(__TU|RBOC__).|
|00002e00| 20 20 20 20 73 77 69 74 | 63 68 20 28 6a 75 73 74 | swit|ch (just|
|00002e10| 29 20 7b 0a 20 20 20 20 | 63 61 73 65 20 4c 45 46 |) {. |case LEF|
|00002e20| 54 3a 0a 09 70 63 5f 68 | 6a 75 73 74 69 66 79 20 |T:..pc_h|justify |
|00002e30| 3d 20 4c 45 46 54 5f 54 | 45 58 54 3b 0a 09 70 63 |= LEFT_T|EXT;..pc|
|00002e40| 5f 76 6a 75 73 74 69 66 | 79 20 3d 20 43 45 4e 54 |_vjustif|y = CENT|
|00002e50| 45 52 5f 54 45 58 54 3b | 0a 09 62 72 65 61 6b 3b |ER_TEXT;|..break;|
|00002e60| 0a 20 20 20 20 63 61 73 | 65 20 43 45 4e 54 52 45 |. cas|e CENTRE|
|00002e70| 3a 0a 09 70 63 5f 68 6a | 75 73 74 69 66 79 20 3d |:..pc_hj|ustify =|
|00002e80| 20 43 45 4e 54 45 52 5f | 54 45 58 54 3b 0a 09 70 | CENTER_|TEXT;..p|
|00002e90| 63 5f 76 6a 75 73 74 69 | 66 79 20 3d 20 43 45 4e |c_vjusti|fy = CEN|
|00002ea0| 54 45 52 5f 54 45 58 54 | 3b 0a 09 62 72 65 61 6b |TER_TEXT|;..break|
|00002eb0| 3b 0a 20 20 20 20 63 61 | 73 65 20 52 49 47 48 54 |;. ca|se RIGHT|
|00002ec0| 3a 0a 09 70 63 5f 68 6a | 75 73 74 69 66 79 20 3d |:..pc_hj|ustify =|
|00002ed0| 20 52 49 47 48 54 5f 54 | 45 58 54 3b 0a 09 70 63 | RIGHT_T|EXT;..pc|
|00002ee0| 5f 76 6a 75 73 74 69 66 | 79 20 3d 20 43 45 4e 54 |_vjustif|y = CENT|
|00002ef0| 45 52 5f 54 45 58 54 3b | 0a 09 62 72 65 61 6b 3b |ER_TEXT;|..break;|
|00002f00| 0a 20 20 20 20 7d 0a 20 | 20 20 20 73 65 74 74 65 |. }. | sette|
|00002f10| 78 74 6a 75 73 74 69 66 | 79 28 70 63 5f 68 6a 75 |xtjustif|y(pc_hju|
|00002f20| 73 74 69 66 79 2c 20 70 | 63 5f 76 6a 75 73 74 69 |stify, p|c_vjusti|
|00002f30| 66 79 29 3b 0a 20 20 20 | 20 72 65 74 75 72 6e 20 |fy);. | return |
|00002f40| 31 3b 0a 23 65 6c 69 66 | 20 64 65 66 69 6e 65 64 |1;.#elif| defined|
|00002f50| 28 5f 5f 57 41 54 43 4f | 4d 43 5f 5f 29 0a 20 20 |(__WATCO|MC__). |
|00002f60| 20 20 73 77 69 74 63 68 | 20 28 6a 75 73 74 29 20 | switch| (just) |
|00002f70| 7b 0a 20 20 20 20 63 61 | 73 65 20 4c 45 46 54 3a |{. ca|se LEFT:|
|00002f80| 0a 09 70 63 5f 68 6a 75 | 73 74 69 66 79 20 3d 20 |..pc_hju|stify = |
|00002f90| 5f 4c 45 46 54 3b 0a 09 | 70 63 5f 76 6a 75 73 74 |_LEFT;..|pc_vjust|
|00002fa0| 69 66 79 20 3d 20 5f 48 | 41 4c 46 3b 0a 09 62 72 |ify = _H|ALF;..br|
|00002fb0| 65 61 6b 3b 0a 20 20 20 | 20 63 61 73 65 20 43 45 |eak;. | case CE|
|00002fc0| 4e 54 52 45 3a 0a 09 70 | 63 5f 68 6a 75 73 74 69 |NTRE:..p|c_hjusti|
|00002fd0| 66 79 20 3d 20 5f 43 45 | 4e 54 45 52 3b 0a 09 70 |fy = _CE|NTER;..p|
|00002fe0| 63 5f 76 6a 75 73 74 69 | 66 79 20 3d 20 5f 48 41 |c_vjusti|fy = _HA|
|00002ff0| 4c 46 3b 0a 09 62 72 65 | 61 6b 3b 0a 20 20 20 20 |LF;..bre|ak;. |
|00003000| 63 61 73 65 20 52 49 47 | 48 54 3a 0a 09 70 63 5f |case RIG|HT:..pc_|
|00003010| 68 6a 75 73 74 69 66 79 | 20 3d 20 5f 52 49 47 48 |hjustify| = _RIGH|
|00003020| 54 3b 0a 09 70 63 5f 76 | 6a 75 73 74 69 66 79 20 |T;..pc_v|justify |
|00003030| 3d 20 5f 48 41 4c 46 3b | 0a 09 62 72 65 61 6b 3b |= _HALF;|..break;|
|00003040| 0a 20 20 20 20 7d 0a 20 | 20 20 20 5f 73 65 74 74 |. }. | _sett|
|00003050| 65 78 74 61 6c 69 67 6e | 28 70 63 5f 68 6a 75 73 |extalign|(pc_hjus|
|00003060| 74 69 66 79 2c 20 70 63 | 5f 76 6a 75 73 74 69 66 |tify, pc|_vjustif|
|00003070| 79 29 3b 0a 20 20 20 20 | 72 65 74 75 72 6e 20 31 |y);. |return 1|
|00003080| 3b 0a 23 65 6c 73 65 0a | 20 20 20 20 72 65 74 75 |;.#else.| retu|
|00003090| 72 6e 20 28 6a 75 73 74 | 20 3d 3d 20 4c 45 46 54 |rn (just| == LEFT|
|000030a0| 29 3b 0a 23 65 6e 64 69 | 66 0a 7d 0a 0a 54 45 52 |);.#endi|f.}..TER|
|000030b0| 4d 5f 50 55 42 4c 49 43 | 20 76 6f 69 64 20 50 43 |M_PUBLIC| void PC|
|000030c0| 5f 70 75 74 5f 74 65 78 | 74 28 78 2c 20 79 2c 20 |_put_tex|t(x, y, |
|000030d0| 73 74 72 29 0a 69 6e 74 | 20 78 2c 20 79 3b 0a 63 |str).int| x, y;.c|
|000030e0| 68 61 72 20 2a 73 74 72 | 3b 0a 7b 0a 23 69 66 64 |har *str|;.{.#ifd|
|000030f0| 65 66 20 5f 5f 54 55 52 | 42 4f 43 5f 5f 0a 20 20 |ef __TUR|BOC__. |
|00003100| 20 20 73 65 74 74 65 78 | 74 73 74 79 6c 65 28 44 | settex|tstyle(D|
|00003110| 45 46 41 55 4c 54 5f 46 | 4f 4e 54 2c 20 70 63 5f |EFAULT_F|ONT, pc_|
|00003120| 74 65 78 74 5f 64 69 72 | 2c 20 70 63 5f 74 65 78 |text_dir|, pc_tex|
|00003130| 74 5f 73 69 7a 65 29 3b | 0a 20 20 20 20 73 65 74 |t_size);|. set|
|00003140| 74 65 78 74 6a 75 73 74 | 69 66 79 28 70 63 5f 68 |textjust|ify(pc_h|
|00003150| 6a 75 73 74 69 66 79 2c | 20 70 63 5f 76 6a 75 73 |justify,| pc_vjus|
|00003160| 74 69 66 79 29 3b 0a 20 | 20 20 20 6f 75 74 74 65 |tify);. | outte|
|00003170| 78 74 78 79 28 78 2c 20 | 70 63 5f 6c 61 73 74 79 |xtxy(x, |pc_lasty|
|00003180| 20 2d 20 79 2c 20 73 74 | 72 29 3b 0a 23 65 6e 64 | - y, st|r);.#end|
|00003190| 69 66 20 2f 2a 20 5f 5f | 54 55 52 42 4f 43 5f 5f |if /* __|TURBOC__|
|000031a0| 20 2a 2f 0a 23 69 66 64 | 65 66 20 5f 5f 57 41 54 | */.#ifd|ef __WAT|
|000031b0| 43 4f 4d 43 5f 5f 0a 20 | 20 20 20 5f 73 65 74 63 |COMC__. | _setc|
|000031c0| 68 61 72 73 69 7a 65 28 | 70 63 5f 74 65 78 74 5f |harsize(|pc_text_|
|000031d0| 73 69 7a 65 20 2a 20 50 | 43 5f 56 43 48 41 52 2c |size * P|C_VCHAR,|
|000031e0| 20 70 63 5f 74 65 78 74 | 5f 73 69 7a 65 20 2a 20 | pc_text|_size * |
|000031f0| 50 43 5f 48 43 48 41 52 | 29 3b 0a 20 20 20 20 5f |PC_HCHAR|);. _|
|00003200| 73 65 74 74 65 78 74 61 | 6e 67 28 70 63 5f 74 65 |settexta|ng(pc_te|
|00003210| 78 74 5f 64 69 72 29 3b | 0a 20 20 20 20 5f 73 65 |xt_dir);|. _se|
|00003220| 74 74 65 78 74 61 6c 69 | 67 6e 28 70 63 5f 68 6a |ttextali|gn(pc_hj|
|00003230| 75 73 74 69 66 79 2c 20 | 70 63 5f 76 6a 75 73 74 |ustify, |pc_vjust|
|00003240| 69 66 79 29 3b 0a 20 20 | 20 20 5f 67 72 74 65 78 |ify);. | _grtex|
|00003250| 74 28 78 2c 20 70 63 5f | 6c 61 73 74 79 20 2d 20 |t(x, pc_|lasty - |
|00003260| 79 2c 20 73 74 72 29 3b | 0a 23 65 6e 64 69 66 20 |y, str);|.#endif |
|00003270| 2f 2a 20 57 41 54 43 4f | 4d 43 20 2a 2f 0a 23 69 |/* WATCO|MC */.#i|
|00003280| 66 64 65 66 20 4d 53 43 | 0a 23 65 6e 64 69 66 20 |fdef MSC|.#endif |
|00003290| 2f 2a 20 4d 53 43 20 2a | 2f 0a 7d 0a 0a 23 65 6e |/* MSC *|/.}..#en|
|000032a0| 64 69 66 20 2f 2a 20 54 | 45 52 4d 5f 42 4f 44 59 |dif /* T|ERM_BODY|
|000032b0| 20 2a 2f 0a 0a 23 69 66 | 64 65 66 20 54 45 52 4d | */..#if|def TERM|
|000032c0| 5f 54 41 42 4c 45 0a 0a | 54 45 52 4d 5f 54 41 42 |_TABLE..|TERM_TAB|
|000032d0| 4c 45 5f 53 54 41 52 54 | 28 64 6f 73 70 63 5f 64 |LE_START|(dospc_d|
|000032e0| 72 69 76 65 72 29 0a 20 | 20 20 20 22 64 6f 73 70 |river). | "dosp|
|000032f0| 63 22 2c 20 22 49 42 4d | 20 50 43 2f 43 6c 6f 6e |c", "IBM| PC/Clon|
|00003300| 65 20 72 75 6e 6e 69 6e | 67 20 44 4f 53 22 2c 0a |e runnin|g DOS",.|
|00003310| 20 20 20 20 50 43 5f 58 | 4d 41 58 2c 20 50 43 5f | PC_X|MAX, PC_|
|00003320| 59 4d 41 58 2c 20 50 43 | 5f 56 43 48 41 52 2c 20 |YMAX, PC|_VCHAR, |
|00003330| 50 43 5f 48 43 48 41 52 | 2c 0a 20 20 20 20 50 43 |PC_HCHAR|,. PC|
|00003340| 5f 56 54 49 43 2c 20 50 | 43 5f 48 54 49 43 2c 20 |_VTIC, P|C_HTIC, |
|00003350| 6f 70 74 69 6f 6e 73 5f | 6e 75 6c 6c 2c 20 50 43 |options_|null, PC|
|00003360| 5f 69 6e 69 74 2c 20 50 | 43 5f 72 65 73 65 74 2c |_init, P|C_reset,|
|00003370| 0a 20 20 20 20 50 43 5f | 74 65 78 74 2c 20 6e 75 |. PC_|text, nu|
|00003380| 6c 6c 5f 73 63 61 6c 65 | 2c 20 50 43 5f 67 72 61 |ll_scale|, PC_gra|
|00003390| 70 68 69 63 73 2c 20 50 | 43 5f 6d 6f 76 65 2c 20 |phics, P|C_move, |
|000033a0| 50 43 5f 76 65 63 74 6f | 72 2c 0a 20 20 20 20 50 |PC_vecto|r,. P|
|000033b0| 43 5f 6c 69 6e 65 74 79 | 70 65 2c 20 50 43 5f 70 |C_linety|pe, PC_p|
|000033c0| 75 74 5f 74 65 78 74 2c | 20 50 43 5f 74 65 78 74 |ut_text,| PC_text|
|000033d0| 5f 61 6e 67 6c 65 2c 0a | 20 20 20 20 50 43 5f 6a |_angle,.| PC_j|
|000033e0| 75 73 74 69 66 79 5f 74 | 65 78 74 2c 20 6c 69 6e |ustify_t|ext, lin|
|000033f0| 65 5f 61 6e 64 5f 70 6f | 69 6e 74 2c 20 64 6f 5f |e_and_po|int, do_|
|00003400| 61 72 72 6f 77 2c 20 73 | 65 74 5f 66 6f 6e 74 5f |arrow, s|et_font_|
|00003410| 6e 75 6c 6c 0a 54 45 52 | 4d 5f 54 41 42 4c 45 5f |null.TER|M_TABLE_|
|00003420| 45 4e 44 28 70 63 5f 64 | 72 69 76 65 72 29 0a 0a |END(pc_d|river)..|
|00003430| 23 75 6e 64 65 66 20 4c | 41 53 54 5f 54 45 52 4d |#undef L|AST_TERM|
|00003440| 0a 23 64 65 66 69 6e 65 | 20 4c 41 53 54 5f 54 45 |.#define| LAST_TE|
|00003450| 52 4d 20 64 6f 73 70 63 | 5f 64 72 69 76 65 72 0a |RM dospc|_driver.|
|00003460| 0a 23 65 6e 64 69 66 20 | 2f 2a 20 54 45 52 4d 5f |.#endif |/* TERM_|
|00003470| 54 41 42 4c 45 20 2a 2f | 0a 23 65 6e 64 69 66 20 |TABLE */|.#endif |
|00003480| 2f 2a 20 54 45 52 4d 5f | 50 52 4f 54 4f 5f 4f 4e |/* TERM_|PROTO_ON|
|00003490| 4c 59 20 2a 2f 0a 0a 23 | 69 66 64 65 66 20 54 45 |LY */..#|ifdef TE|
|000034a0| 52 4d 5f 48 45 4c 50 0a | 53 54 41 52 54 5f 48 45 |RM_HELP.|START_HE|
|000034b0| 4c 50 28 64 6f 73 70 63 | 29 0a 22 31 20 64 6f 73 |LP(dospc|)."1 dos|
|000034c0| 70 63 22 2c 0a 22 3f 63 | 6f 6d 6d 61 6e 64 73 20 |pc",."?c|ommands |
|000034d0| 73 65 74 20 74 65 72 6d | 69 6e 61 6c 20 64 6f 73 |set term|inal dos|
|000034e0| 70 63 22 2c 0a 22 3f 73 | 65 74 20 74 65 72 6d 69 |pc",."?s|et termi|
|000034f0| 6e 61 6c 20 64 6f 73 70 | 63 22 2c 0a 22 3f 73 65 |nal dosp|c",."?se|
|00003500| 74 20 74 65 72 6d 20 64 | 6f 73 70 63 22 2c 0a 22 |t term d|ospc",."|
|00003510| 3f 74 65 72 6d 69 6e 61 | 6c 20 64 6f 73 70 63 22 |?termina|l dospc"|
|00003520| 2c 0a 22 3f 74 65 72 6d | 20 64 6f 73 70 63 22 2c |,."?term| dospc",|
|00003530| 0a 22 3f 64 6f 73 70 63 | 22 2c 0a 22 20 54 68 65 |."?dospc|",." The|
|00003540| 20 60 64 6f 73 70 63 60 | 20 74 65 72 6d 69 6e 61 | `dospc`| termina|
|00003550| 6c 20 64 72 69 76 65 72 | 20 73 75 70 70 6f 72 74 |l driver| support|
|00003560| 73 20 50 43 73 20 77 69 | 74 68 20 61 72 62 69 74 |s PCs wi|th arbit|
|00003570| 72 61 72 79 20 67 72 61 | 70 68 69 63 73 20 62 6f |rary gra|phics bo|
|00003580| 61 72 64 73 2c 20 77 68 | 69 63 68 22 2c 0a 22 20 |ards, wh|ich",." |
|00003590| 77 69 6c 6c 20 62 65 20 | 61 75 74 6f 6d 61 74 69 |will be |automati|
|000035a0| 63 61 6c 6c 79 20 64 65 | 74 65 63 74 65 64 2e 20 |cally de|tected. |
|000035b0| 20 49 74 20 73 68 6f 75 | 6c 64 20 62 65 20 75 73 | It shou|ld be us|
|000035c0| 65 64 20 6f 6e 6c 79 20 | 69 66 20 79 6f 75 20 61 |ed only |if you a|
|000035d0| 72 65 20 6e 6f 74 20 75 | 73 69 6e 67 22 2c 0a 22 |re not u|sing",."|
|000035e0| 20 74 68 65 20 67 63 63 | 20 6f 72 20 5a 6f 72 74 | the gcc| or Zort|
|000035f0| 65 63 20 43 2f 43 2b 2b | 20 63 6f 6d 70 69 6c 65 |ec C/C++| compile|
|00003600| 72 73 2e 22 0a 45 4e 44 | 5f 48 45 4c 50 28 64 6f |rs.".END|_HELP(do|
|00003610| 73 70 63 29 0a 23 65 6e | 64 69 66 20 2f 2a 20 54 |spc).#en|dif /* T|
|00003620| 45 52 4d 5f 48 45 4c 50 | 20 2a 2f 0a |ERM_HELP| */. |
+--------+-------------------------+-------------------------+--------+--------+